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The statements of basic BASIC 


Items in square brackets are optional 

line numberDAJA constant [, constant . . .] 

line number DEF FN a(variable) = expression 

line numberDIM subscripted variable [, subscripted variable . . .] 

line numberYiNY) 

line number FOR variable = expression TO expression 
[STEP expression ] 

line number GOSUB line number 
line numberGO TO line number 

line numberlF relational expression THEN line number 

line number INPUT variable [, variable . . .] 

line number LET variable = expression 

line number'NEXT variable 

line number ON expression GO TO line number 

[, line number . . .] 

line number OPTION BASE base 

line numberRRWY [quantity delimiter quantity . . .] 

line number R AN DOM IZE 

line numberREAE) variable [, variable . . . ] 

line numberREM. any remark or comment 

line ««ot6<?a-RESTORE 

line number RETURN 

line numberSXO? 


Standard Library functions in BASIC 


Function Meaning 


SQR(expression) 
ABS(expression) 
SGN {expression) 
YHliexpression) 
EXP (expression) 
LOG (expression) 
SIN {expression) 
COS ( expression ) 
TAN {expression) 
ATN( expression) 


Square root of expression 

Absolute value of expression 

Sign of expression-. 1 if > 0, 0 if 0, — 1 if < 0 

Largest integer not greater than expression 

The value of 

Natural logarithm (base e) of expression 
Sine of expression, expression in radians 
Cosine of expression, expression in radians 
Tangent of expression, expression in radians 
The angle in the range — 7r/2 to 7r/2 
radians whose tangent is expression 


Unit 12 
Unit 9 
Unit 10 
Unit 1 

Unit 7 
Unit 13 
Unit 4 
Unit 5 
Unit 3 
Unit 3 
Unit 7 

Unit 5 
Unit 10 
Unit 1,3,8 
Unit 6 
Unit 12 
Unit 3 
Unit 12 
Unit 13 
Unit 13 


The function RND, which is a random number generator, also appears in most 
of BASIC, together with the RANDOMIZE function. 
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PREFACE 


Computer programming is something that nearly everyone can do, and many people are 
now finding this out using BASIC, the language designed to help them learn. The second 
edition of this little course again gives priority to two objectives which I believe are 
necessary in the learning process. First of all it is fully structured, which means that I 
intend it to be followed in order using a computer. (I am flattered by the extent to which 
this principle, almost unique at the time of the first edition, has been imitated.) Secondly 
I feel that the level of examples and problems must be neither so banal as to insult the 
intelligence of the reader, nor so advanced as to be bewildering. I recognise that practical 
computing cannot be totally non-mathematical - after all it is numbers that are dealt 
with—and so some of the material is related to secondary school mathematics. There are 
also some instances of numerical computation which I hope will be regarded from a 
programming point of view rather than a mathematical one. All the material is intended 
to be approachable. 

This book describes the basic BASIC that everyone should know. I can say this for sure 
because international standards for ‘minimal BASIC’ have now been adopted which are 
very close to the basic BASIC that I originally chose, and the second edition is intended 
to be in harmony with the standard. Because of the recent explosive growth in home and 
educational computers, I hope the new edition will continue to meet the need for an 
introduction to the subset of BASIC that one could reasonably expect to find on any 
small computer. 

You see before you the first attempt at using a new interactive computer system for 
typesetting which James Murphy has worked very hard at realising for me over the past 
eighteen months. This book is proof of its success, and my editor Jan Williams has been 
particularly courageous in using it to set up basic BASIC while it was still at the ‘User 
Hostile’ stage of development. I extend my heartfelt thanks to both of you. There is also 
a special medal of honour for David James who has volunteered to spend part if not all of 
his Christmas holiday hacking through the examples one last time on his BBC Micro, to 
reduce if not eliminate the risk that our dear readers may have to cope with the dreaded 
typographical errors in the programs. 

This new edition takes account of the new importance of desk- and table-top computing, 
and I have managed to squeeze additional examples of small programs that will work 
into nearly every chapter. Apart from that, I have hardly dared to tamper with such a 
successful formula. I hope that this little book will continue to meet the needs of so many 
schools, colleges and private citizens. 


Completed on Christmas Eve 1984 


D M Monro 
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INTRODUCTION 


1 Computer languages 

Like any language, BASIC is used by people for the communication of ideas. Unlike 
English, French, or German, a communication in BASIC is directed towards a 
calculating machine which is somehow equipped to accept instructions written in BASIC. 
There are many computer languages, some intended for specific uses and others which 
are said to be general, meaning that any computing task could be expressed using them. 
BASIC is at the same time both specific and general, and more people now use it than 
any other computer language. The name BASIC stands for ‘Beginner’s All-purpose 
Symbolic Instruction Code’, and the word ‘beginners’ is the key to its special use as a 
language for learning the fundamentals of computation in an easily understood form. 
Perhaps that is why it is the standard language of so many small computers, and in turn 
that is why so many people are now using it. At the same time BASIC is a very useful 
general purpose language with some unique features. 

All languages have rules of grammar, and in computing these rules must be precise so 
that no statement of the language has more than one meaning. However, BASIC has a 
grammar which is intentionally simplified so that only a few rules must be learned before 
real computations can be performed, as will be seen in Unit 1. Because all the essential 
facilities for computation are present, the emphasis can be placed on the style and 
methods of computation. When the techniques of computing have been mastered it is 
easy to convert to the traditional languages of large scale computation because BASIC 
strongly resembles them. 


2 Computer systems 

Every computer is organised around a calculating machine which might be a single 
microchip, or a huge system. Such a machine has no personality or intelligence of its 
own; anything it does is a result of human instruction. It has a repertoire of simple orders 
which it obeys slavishly. A series of these orders would be called a computer program; 
the concept of a program is an easy one for humans to grasp and develops naturally in 
this course by example. It is important to realise that the machine cannot tell if its very 
literal interpretation of the program makes sense. A computer’s mistakes are nearly 
always the fault of the program. 
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3 Batch and interactive computing 

Originally computer systems were organised to deal with one program at a time, and 
programs were presented in groups or ‘batches’ which the machine processed one after 
the other. The programmer submitted his program to a computing service, usually on 
punched cards, and collected the result some time later. BASIC, like any other language, 
can be run in this way, and a great deal of computing is still done in batches. The 
disadvantage for small programs and for learning is that the ‘turnaround’ time is 
unlikely to be less than a few hours and could be measured in days. However batch 
systems are very widely used, particularly for production work, for reasons of economy. 

Recently, the cost of computers has fallen and at the same time their capabilities have 
increased. Now a personal computer, dedicated to one user, is a common sight at work, 
in the classroom and in the homes of ordinary people. This means that ‘interactive 
computing’ is now available to nearly everyone. 

Interactive computing puts a programmer into direct communication with the computer, 
usually through a terminal with a keyboard and a screen or typewriter. He may have the 
computer to himself or he may be ‘timesharing’ with others unseen to him. The time 
taken to submit a program and receive results is reduced to seconds and so program 
development and error correction are supported in a convenient manner. The learning 
process is both shortened and made more thorough because the rapid response and the 
straighforward nature of BASIC encourage experimentation. 


4 How to learn BASIC 

The key to effective learning is practice on a real computer. First of all, it is essential to 
be able to run BASIC programs, ideally by using an interactive system. A source of 
expert advice is required, not so much about BASIC as about your computer system. To 
learn BASIC simply follow the Units in order and do all the exercises because they 
provide exploration and clarification which are vital to complete understanding. 
If there is something that is not clear to you, then experiment using BASIC. That is the 
joy of interactive computing. Problems are provided at the end of each Unit. Solutions to 
problems should be worked out on paper before trying them at a terminal. Nothing is 
more futile than trying to think out solutions at the keyboard; even the most tentative 
outline can save hours. 


UNIT 1 
Getting started 


1 Introduction 

An advantage of BASIC is that a small amount of information enables it to be used. This 
makes it easy to learn and easy to remember. This Unit introduces the simplest kind of 
BASIC program and shows how to create, edit, and run it. 


2 A simple program in BASIC—the PRINT and END statements 

A computer program in BASIC is a series of instructions having a natural order, written 
as statements using familiar English and mathematical terms. The meaning of the 
program is clear to the programmer and is also precise for the computer. 

The following very simple BASIC program has two lines, each stating an instruction to 
the computer from the programmer: 

10 PRINT 2 t 2 
20 END 

The program instructs the computer to evaluate the expression 2 + 2 and to print the 
result. Two important grammatical rules of BASIC are evident in the example: 

(i) Each of the two lines begins with a line number. These line numbers dictate the 
order of events when a program is obeyed. Every line must begin with a line number. 

(ii) The program ends with an END statement. Every BASIC program should have 
an END statement as its highest numbered line. Although some computers allow it 
to be left out, a BASIC like that is not standard. 

Two different statements of BASIC appear in this simple example, the PRINT 
statement and the END statement. The intention of the program is clear; when it is 
obeyed by a computer, at line 10 a sum (2 + 2) is evaluated and at line 20 the program 
ends. 

The meaning of complicated programs can often be clarified by the use of a flowchart, 
which shows diagrammatically the steps involved in a computer program and their order. 
This simple program has a simple flowchart, as shown in Fig. 1.1. 
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( START J 


LINE 10 



7 


10 PRINT 2+2 


LINE 20 STOP 20 END 


•ig. LI. Flowchart of a very simple BASIC program 


3 Creating BASIC programs 

A BASIC program is created simply by typing it at the computer keyboard. Most 
computers that use BASIC are based on interactive use, where the programmer 
communicates directly with the computer through a keyboard. This is true both of huge 
timesharing computers with hundreds of terminals and of the humblest home computer 
dedicated to its proud owner. Large computers have their own procedures for recognising 
permitted users and connecting them to interactive BASIC. This is where expert help 
may be required for the first time. 

With the computer system prepared to receive a program, the little program given 
above can be entered by typing it. The keyboard is laid out very much like a typewriter 
but some of the special symbols such as ' + ’ are in unexpected places and there are some 
extra keys. Each separate line is entered, beginning with its line number and ending with 
the special key used to terminate lines. Usually this key is labelled ‘RETURN’, but 
sometimes it is ‘ENTER’. It is always at the right hand end of the keyboard. The first 
symbols typed must be the line number. The order in which the lines are entered is 
unimportant because the line numbers tell BASIC what the real order should be. It is 
usual to separate the line numbers by 10, since the programmer may later wish to insert 
extra lines, although any separation is allowed down to consecutive numbers. At least one 
space is usually required after the line number. Keywords like PRINT and END must 
have either spaces or punctuation on both sides of them. 

Exercise With the computer system ready for it, enter the simple program. Be careful 
that the first symbols in each line are the line number. Do not begin a line with a space, 
and do not attempt to correct errors at this stage. 
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4 Listing BASIC programs—the command LIST 

Typing mistakes can easily occur in entering a BASIC program, and errors between the 
computer and the keyboard are possible, although unlikely. Once a program has been 
entered it is important to be able to examine it as it is known to the computer. The system 
command LIST is usually provided for this purpose, and causes the current version of the 
program to be displayed on the screen or terminal. 

Exercise Use the command LIST to obtain a listing of the sample program. 

It is important to distinguish between commands like LIST whose first symbol is a letter, 
and lines of BASIC which begin with a number. This is how the computer tells the 
difference; everything that begins with a number is a line of BASIC. 


5 Editing BASIC programs 

It is very likely that typing or other mistakes will be made when a program is entered, so 
that a means of editing is necessary. With BASIC it is possible to change lines, insert new 
lines, and eliminate unwanted ones. All these procedures are based on the line numbers; 
when a new line is typed in it becomes a part of the program. The procedures are: 

(i) To replace or correct a line: type the new line in full and press ‘RETURN’. 

Example The program reads 

10 PRANT 2 + 2 
20 END 

You type in 

10 PRINT 2+1 and ‘RETURN’ 

The corrected program reads 

10 PRINT 2 + 2 
20 END 

(ii) To insert a line: type in the new line with a suitable line number and ‘RETURN’. 
For example a new line numbered 15 could be inserted between lines 10 and 20 of the 
sample program. 

Example To the sample program you add a line by typing 


15 PRINT S+3 
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The program then reads 

10 PRINT 2-2 
15 PRINT 5,t$S 
20 END 

(iii) To eliminate a line: type in only the line number, and ‘RETURN’. 

Example Todelete the extra line added in (ii) you type 

15 (just the line number and ‘RETURN’ 
with no blank spaces) 

The program then reads 

10 PRINT 2 + 2 
20 END 

Note that to correct a line, the new version has to be typed in full. This is sometimes 
tedious, so that careful original typing is always worthwhile. Most systems also provide a 
means of correcting characters in a line while it is being typed. On the keyboard there 
will be a symbol which deletes the previous one a letter gobbling key. Often this is a 
‘<=’ (‘back arrow’) but sometimes it is DEL or backspace or CTRL and El. Ask an expert. 
An incorrect symbol in any program line or command which is noticed before the line is 
finished can be removed by typing in enough of these letter gobblers to reach the error, 
and then typing of the line can be resumed from the corrected symbol. For example the 
twice corrected line 

10 PRA<=INP 2 + 2<=<=<+-t=«=T 2 + 2 

is the same as 

10 PRINT 2 + 2 

In the version with back arrows, the blank betwen P and 2 counts as a character. 

Exercise Experiment with the editing facilities to add, change, and delete lines in the 
sample program. Find out what the letter gobbler is on your computer, and try using it to 
correct errors while typing. Finally, restore the program to its given form and list it to be 
sure. 


6 Running BASIC programs—the command RUN 

So far in this Unit the sample program has been created, listed, and edited, but it has not 
been tried. The command RUN is provided to initiate the running of a program. When 
the RUN command is entered, the computer begins to execute the instructions given by 
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the program. When a program is running the computer has taken control of the session 
and it is not possible to edit the program or to use other commands until it is finished. The 
sample program will terminate itself at the END statement. 

Exercise Run the sample program, by typing in the command RUN. 


7 Problems 

Problem 1.1 The following BASIC program has been entered. Is it correct? 

20 PRINP 1+3 
10 END 

Without using the computer, try to follow what happens to the program as the following 
lines are typed in order. RETURN is pressed after each line: 


(i) 

30 END 

(v) 

25 PRINT 5 — 3 

(ii) 

10 

(vi) 

20 PRIYP<=<=NT 1+3 

(iii) 

15 

(vii) 

2PR<=<=5 

(iv) 

20 PRINT 1P3 

(viii) 

LIST 


Is it now correct? What will happen if the RUN command is entered? So try it. 

Problem 1.2 The computer will interpret the following lines as either lines of BASIC or 
commands. Classify them as one or the other from the computer’s point of view. The 
symbol <=<= stands for the letter gobbling key. 


(i) 

10 PRINT 3 

(v) 

PRINT 2 + 2 

(ii) 

LIST 

(vi) 

15 LIST 

(iii) 

2 0<=<=END 

(vii) 

99<+<=RUN 

(iv) 

RUN<=<=<=30 END 

(viii) 

LIST<=<=<=40 END 


Not all of these lines will produce a correct line of BASIC. Which are correct? 


UNIT 2 


The arithmetic of BASIC 


1 Introduction 

Armed with the ability to prepare simple BASIC programs acquired in Unit 1, it is now 
possible to introduce the rules of arithmetic as they apply to BASIC. By the end of this 
unit it will be possible to use BASIC on your computer as a programmable calculator for 
the evaluation of complicated expressions. 


2 Addition and subtraction 

The sample program of Unit 1 included the addition facility. An expression including 
addition is formed simply by placing a plus sign between the numbers to be added. In the 
expressions considered here the numbers are constants like 1, 2, 3, etc., and expressions 
are formed from these. The program 

10 print 2 + 2 

20 END 

contains the expression 2 + 2 formed by the operation of addition between the constants 
2 and 2. A number by itself is an expression as well, such as in 

10 PRINT 38 
20 END 

Not surprisingly the operation of subtraction is indicated by a minus sign: 

10 PRINT 4-3 
20 END 

Everyone knows that the order of addition is unimportant; that is, 5+1 is the same as 
1+5. This is not true for subtraction, since 5—1 is not the same as 1—5. This is an 
obvious example of an important fact, namely that the order of numbers and operators 
like + and — in an expression is important. In BASIC the results always appear as if the 
operations were done from left to right, so that the meaning of a program like 

10 PRINT 4-3 + 7 
20 END 
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is obvious to the programmer and the computer. 

The symbols + and — also have a meaning if they precede a number, for example in 

10 PRINT -3 
20 END 

Used in this way, they give a sign to a value. This is not true of any other arithmetic 
symbol. 

Exercise Ensure that addition and subtraction and their combination is understood, by 
trying some programs. 


3 Multiplication and division 

Multiplication in BASIC is indicated by the symbol * written between the numbers to be 
multiplied. Like addition, it is of course order-independent, i.e. 5*3 is the same as 3*5. 

Exercise Try this: 

10 PRINT 4.2*3.7 
20 END 

Here there are constants which have decimal points in them. This is always acceptable in 
BASIC. 

In BASIC division occurs when the symbol / is used. Division is order-dependent so that 

6/3 is 2 
and 

3/6 is 0.5 

Exercise Try some divisions. What does BASIC do about decimal points when the 
result of an integer division is not an integer? What if it is? 

Exercise Now mix multiplication with division. Do not include addition or subtraction 
yet. 


4 Exponentiation 

There is one more operation of arithmetic in BASIC, which is the raising of a number to 
a power. The keyboard symbol that should be used for this is A, because it resembles a 
vertical arrow. Sometimes, however, an actual vertical arrow is used. This is another 
order-dependent operation, so that 
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5A3 means 125 

and 

3A5 means 243 

It is worth noting that fractional powers have their usual meaning: 

2A0.5 means^/2 which is 1.4142 .. . 

Any number raised to the power 0 gives the result 1, including 0AO. It is wrong to raise 0 
to a negative power, or to raise a negative number to a power which is not an integer. 

Exercise Tryout exponentiation, still without mixing in other operations. 


5 Expressions 

The introduction of more general expressions has been delayed because there is a 
potential ambiguity in their meaning. For example, does 

3 + 4*5 mean (3 + 4)*5 which is 35 
or 3 + (4*5) which is 23 ? 

It may come as a surprise that the correct result is 23, in apparent contradiction to the 
statement that expressions give results as if they were evaluated from left to right. This is 
explained in the next section. 


6 Rules of arithmetic in BASIC 

In BASIC the rules of arithmetic are expressed in terms of a hierarchy of operations in 
which operations of high priority are performed before those of lower priority. The order 
is: 


( ) quantities in brackets high 

A exponentiation 

* / multiplication and division 

+ — addition and subtraction low 

Hence in the expression 3 + 4*5, multiplication has a higher priority than addition so the 
meaning is 3 + (4*5). Where priorities are equal, the result is like an evaluation from left 
to right. No two operators may appear in sequence so that H—2 is not allowed, 
although 1 +( —2) is permitted because any self-contained expression can be preceded by 
a + or —. Therefore —3 is a meaningful expression on its own but *3 is not. 

In BASIC the operation of multiplication must always be stated with the symbol *, i.e. 
as 3*4. The expression (3)(4) which in normal mathematical notation implies 
multiplication is incorrect in BASIC. 
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The availability of brackets provides a convenient means of changing or specifying the 
meaning of an expression because expressions within brackets are evaluated before the 
bracketed quantity is itself used. 

Example On a planet where the acceleration due to gravity is 3.11 metres per second 
per second and there is no atmosphere, a feather dropped from our spaceship hits the 
ground after 7.72 seconds. How high was the feather dropping platform? The formula is: 

distance *= ¥i * acceleration * time-' 

In this BASIC program which gives the answer, the only number to be squared is 7.72: 

10 PRINT 0.5*3.11*7.72A2 
20 END 

Exercise Experiment with the meaning of the following and other expressions using 
BASIC. Clarify them with brackets, and change their meaning. 

4 + 5 /7 7/4*2/5 3/4/5 3A4A5 l+2A3*4/5 + 6 


7 Problems 


Problem 2.1 

Classify as true or false 




(i) 

3 * 4 A 2 

is 144 

(vii) 

7/3 + 4 

is 1 

(ii) 

3/4 2 

is 19 

(viii) 

4 + 5*f 

Is 19 

(hi) 

2 + 4/2 

is 3 

(ix) 

3 A 2* 2 

is 18 

(iv) 

2 A3+4 

is 128 

(x) 

3/6/2 

is 1 

(v) 

2A2/%f 

is 128 

(xi) 

2A3A2 

is 64 

(vi) 

3*4 + 5 

is 27 

(xii) 

9/3+2 

is 5 

Problem 2.2 

State whether the meaning changes if the brackets are removed: 

(i) 

( 3 * 4) A 5 


(v) 

2 A(3 + 4) 


(ii) 

( 3 A 4 ) * 5 


(vi) 

2+ (3A4) 


(hi) 

2 + ( 3 * 6) 


(vii) 

(2A3)+4 


(iv) 

2* ( 3 + 6) 


(viii) 

(2 + 3) A4 



Problem 2.3 A racing driver completes 63.41 miles in 17 minutes 14.679 seconds. Doing 
all the calculations in BASIC, find the average speed. 


Problem 2.4 Freddie deposited $1 in the Incredible Trust Company 9 years and one day 
ago. At the end of each month the Incredible has credited him with 0.62% interest. How 
much has he now? 




UNIT 3 


Communicating with BASIC 


1 Introduction 

It is now possible to show how communication with a BASIC program is arranged when 
it is running. The PRINT statement has already been encountered, and here facilities for 
printing messages as well as results are introduced. The usefulness of BASIC then takes 
a great leap forward with a method of providing values to running programs through the 
use of variables and the INPUT statement. 


2 Printing captions—more about the PRINT statement 

In a complicated program, interpretation of a stream of numbers printed by a running 
program can be very confusing unless explanatory messages are used in the presentation 
of results. In a PRINT statement messages or ‘strings of characters’ can be printed 
simply by enclosing them in quotation marks. BASIC then knows that what is enclosed 
by quotes is to be printed exactly as it appears. 

As an example, consider again the sample program of Unit 1: 

10 PRINT 2 + 2 
20 END 

which produced the numeric result 4. The line 
10 PRINT "2 + 2" 

will give a quite different result. Try it. 

Exercise Try the program 

10 PRINT ”2 + 2 = 2 + 2 

20 END 

Several expressions to be printed must be separated by punctuation marks. A comma can 
be used, as in the example 


10 PRINT 1,2 + 2,4 + 5/7,6.13*7.2 
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which arranges the output into columns of some fixed width. A semicolon is more useful 
because it squeezes values together: 

10 PRINT 1:2;3 

Messages are usually in plain language, as in the following example which has two 
PRINT statements. Note that when this is run, each PRINT statement starts a new line. 

10 PRINT "THIS PROGRAM EVALUATES 2+2" 

20 PRINT "THE ANSWER IS |$ 2 + 2 
30 END 

To separate a message from a number which follows it, end the message with a space to 
make the output easier to read. It is not always necessary to do this when a message 
follows a number. 

Exercise Invent some programs with (polite) messages in them. 


3 Dealing with large numbers 

Some numbers are too large or too small to be printed conveniently in the normal way, 
and so an ‘exponential format’ used by PRINT statements and by programmers has been 
devised. The number is represented by a convenient number multiplied by a power of 10. 
For example, 

The speed of light is 30 000 000 000 centimetres per second. 

Scientists often write this as 3x10"’ cm per second. 

BASIC might write this as 3.0E10 or 3E10, where E means ‘exponent’ 

Similarly 2.4E —23 means 2.4x10 23 

or 0.000 000 000 000 000 000 000 024 


The exponential form is 
nlEn2 

where nl and n2 are numbers and E is the letter E. This is interpreted as 
«/xl0"’ 

It will be found that numbers which are too long to fit into convenient spaces will always 
be rendered by a PRINT statement into this form. 

Exercise Try the program 

10 PRINT ”A BIG ONE IS 1000/.0001 
20 PRINT "AND A SMALL ONE .0001/1000 
30 END 


14 basic BASIC 


A programmer might also wish to write large numbers compactly, and this can be done 
by writing constants in exponential form. The number 540,000 could be written in 
BASIC in several ways, for example 

540000 as an integer 

540000.0 with a decimal point 

5.4E5 decimal point and exponent 

54E4 integer and exponent 


4 Inserting remarks—the REM statement 

Documentation or ‘writing up' is an important part of the job of programming, and 
making a program legible is a part of documenting it. Remarks or comments can be put 
in the written program which are intended to explain the program but which are not part 
of the printed output when it is run. The REM (for REMark) statement allows this. It is 
always good style to use them and they are essential in complicated programs. 

The REM statement has the form 

line number REM any remark or comment 

and added to the sample program could be 

10 REM A PROGRAM TO DEMONSTRATE BASIC 
20 PRINT "THIS PROGRAM EVALUATES 2 + 2" 

30 PRINT "THE ANSWER IS ”; 2 + 2 
40 END 


5 Providing data to running programs—the INPUT statement 

If a calculation is to be repeated several times with different numbers, it is inconvenient 
to spell out the constants each time by rewriting the program. Instead all programming 
languages allow the actual numbers to be entered when the program is run. In BASIC 
the INPUT statement does this. The program is written using symbolic names, much as 
in algebra, and an INPUT statement requests their values. Here is an example showing 
the INPUT statement and how variables are used instead of numbers. 

10 INPUT A,B 
20 PRINT (A + B) /2 
30 END 

At line 10, the program will request values for A and B. This request is indicated by a 
prompt from the computer; often a *?’ is printed when it is ready. The programmer has 
commanded the program to RUN and waits for the ‘?' to appear. The numbers A and B 
are then entered with a comma between and a ‘RETURN’ at the end. After this the 
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computer continues with the program- in this case to calculate the arithmetic mean 
(A + B)/2. 

Actually the example is in poor style. The same computation in a better form is shown 
with its flowchart in Fig. 3.1. The features added to the program demonstrate four points 
of good style: 

(i) REM statements are used to explain the purpose of the program. 

(ii) Before INPUT is requested an explanatory message is issued at line 30. 

(iii) The values of A and B are confirmed by the program at line 60. 

(iv) The result is printed with an explanation at line 70. 


start) 



PRINT 
A AND B 


10 REM DEMONSTRATE THE INPUT STATEMENT 
20 REM PROMPT FOR THE INPUT 

30 PRINT "ENTER A AND B TO OBTAIN THEIR MEAN" 
40 INPUT A,B 

50 REM ECHO THE INPUT AND GIVE THE RESULT 
60 PRINT "A = ”; A;" AND B = ";B 
70 PRINT ”(A + B)/2 = ”;(A + B)/2 
80 END 


(END J) 


Exactly two numbers are expected by the INPUT statement at line 40. When the 
program is run and the “P appears on the screen or terminal, exactly two numbers should 
be typed in with a comma between. If the wrong number of values is entered, a 
self-explanatory message will be issued. The numbers can be in exponential form. 
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Exercise Run the example, typing different values of A and B. Experiment with 
different expressions using more and fewer variables. Make deliberate errors in entering 
values, by entering too many or too few values. Finally, try some numbers in exponential 
form. 


6 BASIC variables 

In the previous section variables A and B were used in an example. There are 286 
variable names allowed by BASIC. These are the single letters A to Z and the 
combination of any single letter followed by any single number, such as AO, Al, . . . A9, 
BO, Bl, . . . B9, and so on. 

Note that the letter O (oh) and the number 0 (zero) are easily confused. It is usually 
obvious what is intended, but when the wrong one has been used in error it can be 
difficult to spot. A widespread practice, adopted here for the programming examples, is 
to cross the number 0 (zero). 


7 Assignment of values to variables—the LET statement 

To begin with, in Unit 1, arithmetic was restricted to constants in PRINT statements. 
Then in this Unit it has been shown how variables could be used instead, but up to this 
point their values could only be assigned by manual entry using INPUT statements. Now 
it will be seen that assignments can be made using a special statement, the LET 
statement. 

The following is an example: 

20 LET B = 3 

which assigns the value 3 to the variable B. Until statement 20 it is likely that B was not 
defined and so could not be used in expressions. This is because a variable has no value 
until one is assigned—although some computers give initial values of zero. To write 
programs that can be moved from one computer to another, never assume that a variable 
is given an initial value. As soon as line 20 is complete the value of B is definitely 3. More 
complicated expressions often occur, such as 

73 LET D = BA2-4*A*C 

which looks like the calculation of the discriminant b 2 — Aac of the quadratic equation 
ax ! +bx + c= 0. A, B and C must be known before line 73 is reached, otherwise the 
computer will object. If they are known the expression of the right hand side is evaluated 
and the result is assigned as the new value of variable D. 

The general form of a LET statement is 
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line number LET variable = expression 

When a LET statement is encountered, the expression on the right hand side is evaluated. 
The result replaces the value of the variable on the left hand side. The effect is therefore 
assignment of a value to the variable. LET statements are commonly called ‘assignment 
statements’ or ‘replacement statements’. Although some computers will allow the 
keyword LET to be left out of assignment statements, it is very poor practice to take 
advantage of this. If the word LET is always used, then the program will not fail on other 
computers, at least not for that particular reason! 


Example Suppose a program is converting feet and inches to metres. The number of 
inches in a metre is a constant, 39.3701, and so a constant is used. The data is requested 
through an INPUT statement and then converted to inches using a LET statement. The 
value in metres is then calculated with a LET statement, and one PRINT statement 
produces the data in inches, along with the metric equivalent. The use of LET statements 
has simplified the PRINT statement, avoided repetitions of the same calculation which 
would be needed to print all the results on one line, and made the program easy to follow. 
The program and flowchart are shown in Fig. 3.2. 

( START 



10 REM CONVERTS FEET AND INCHES TO METRES 
20 REM EXPLAIN THE PROGRAM AND REQUEST DATA 
30 PRINT "TYPE IN A MEASUREMENT IN FEET, INCHES” 
40 INPUT F,I 

50 REM CALCULATE AS INCHES ONLY 

60 LET D= 1 + 12*F 

70 REM CONVERT TO METRES 

80 LET M = D/39.3701 

90 REM PRINT THE RESULTS 

100 PRINT “DISTANCE ;D;' INCHES IS ";M;“ METRES" 


110 END 
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Example In many countries, a tax is added to the price of goods at the point of sale. 
This little program adds tax at 15% to a price: 

10 REM ADDS 15% TAX TO A SALE PRICE 
20 PRINT "ENTER THE PRICE BEFORE TAX AT 15%" 

30 INPUT P0 
40 LET P1= P0 * 1.15 

50 PRINT P0; ” BEFORE TAX BECOMES ";P1;" AFTER." 

60 END 

and this one takes it away. If the price is $1.00 after tax, it isn't $0.85 before tax, 
although it is a very common mistake to think so. Try it and see! 

10 REM REMOVES 15% TAX FROM A PRICE 
20 PRINT "ENTER THE PRICE AFTER TAX AT 15%" 

30 INPUT PI 
40 LET P0 = PI /1.15 

50 PRINT PI;" AFTER TAX WAS ”; P0;" BEFORE." 

60 END 


8 Problems 

However simple a problem may seem, it is always worthwhile to prepare a flowchart and 
write the solution out by hand before attempting it on the computer. It is good style to 
give messages which explain the nature and layout of input data before it is requested, 
and printed output should be accompanied by explanations too. 

Problem 3.1 Write a program to square a number which is typed in. Using this program 
search for the square root of 63 to three significant figures, by running the program as 
many times as are necessary. 

Problem 3.2 Write a program which calculates the return r on compound interest: 
r + if 100)" 

where 1 ^ interest in percent and n = number of periods, or number of times the 
interest has been compounded. 

Using this program, RUN it several times and search for the integer number of periods n 
taken to at least double an investment at i = 4%, 6% and 8%. 

Problem 3.3 Write a program to convert the time of day on a 24 hour clock given as 
hours minutes and seconds to a decimal time system, in which for example 18:30:00 is 
18.50 hours. 


UNIT 4 

Repeating calculations 


1 Introduction 

Many applications of programming in both the business and scientific world require 
programs to be repeated over and over, perhaps with new data as in payroll accounts, or 
perhaps with some variable changing in a regular way. Several ways of organising and 
controlling this kind of repetition will be found in Units which follow, but here the 
simplest case is introduced and then applied to some quite sophisticated calculations. 


2 Repeating calculations—the GO TO statement 

The GO TO statement enables a programmer to change the order in which the 
statements of a program are obeyed. When a GO TO is encountered, the program jumps 
to a new place as specified in the GO TO statement. It has the form 

this line number GO TO another line number 

This line number is just the line number of the statement itself, but another line number 
is another statement of the program which is the target for the jump. For example, 

50 GO TO 10 

causes the computer to jump to line 10 rather than carrying on to the next line number 
after 50. The BASIC standard requires GO TO to have a space in it between GO and 
TO, but many implementations break this rule and insist on GOTO as one word. 

Once a program has been organised to repeat itself, it could go on endlessly unless some 
way has been arranged to stop it. One of the simplest ways is available if the repetition 
contains an INPUT statement as in Fig. 4.1. In this case, when the program requests 
data, the programmer can usually type in STOP. 

If a program loop is printing continuously, it can be stopped from the keyboard. 
Programming accidents do occur from time to time so every BASIC user should know 
how to interrupt a program; the method of doing this varies between systems. Often the 
BREAK or ESCAPE keys are used. 
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10 REM PROGRAM TO DEMONSTRATE ENDLESS REPETITION 
20 PRINT "THIS PROGRAM ASKS FOR ONE INPUT VALUE" 
30 PRINT "IT REPEATS UNTIL YOU STOP IT” 

40 INPUT A 

50 REM PRINT IT AND RETURN FOR MORE 
60 PRINT "YOU TYPED IN ";A;” HOW ABOUT SOME MORE” 
70 GO TO 40 
80 END 


Fig. 4.1. A program 


GO TO statement 


Exercise Find out from an expert how to interrupt a program on your computer. Run 
and terminate the following example: 

10 REM A PAPER EATING PROGRAM 
20 PRINT "STOP ME" 

30 GO TO 20 
40 END 


3 Self-replacement in LET statements 

It is interesting to enquire what will happen if the same variable is used on both sides in a 
LET statement, such as 

99 LET J = J + 1 

The simple answer is that J has been used in calculating its own replacement value. This 
statement is one of self-replacement and one of its important uses is in counting. A 
program which counts by ones from 1 is shown in Fig. 4.2, which illustrates an important 
kind of loop. This is another program requiring manual intervention. 


Exercise Try the program of Fig. 4.2. 
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10 REM A COUNTING PROGRAM 
20 REM ASSIGN THE FIRST VALUE 
30 LET J = 1 
40 PRINT J 

50 REM REPLACE J BY;'g|t- 1 AND REPEAT 
60 LET J = J+t 
70 GO TO 40 
80 END 


Fig. 4.2. A program I 


t endlessly 


There is no reason why the self-replacement cannot be of a more complicated type. Here 
is a program which forms successive squares of a number typed in. 

10 REM FORM SUCCESSIVE SQUARES OF A NUMBER 
20 PRINT "ENTER NUMBER FOR SUCCESSIVE SQUARING” 

30 INPUT A 

40 PRINT A;” SQUARED IS ”;A*A 
50 LET A: ~ A * A 
60 GO TO 40 
70 END 


4 Real programming—recurrence 

By looking at self-replacement in more complicated cases than simple counting, it can be 
seen that a number of useful types of calculation can be undertaken. First of all, it is often 
useful to be able to add things up. To do this a variable is used to hold the sum, which is 
initialised before the loop, and new additions are made each time around the loop. It is 
inconvenient at this stage that the loop cannot be stopped automatically, but this 
problem will be cleared up in the next Unit. 

Figure 4.3 shows a program that counts from 1 by ones and adds up the total counts at 
the same time to find 1 +2 + 3 .... It is similar in structure to Fig. 4.2 but with the sum 
built in. 
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Exercise Run the program of Fig. 4.3. Recall that it must be stopped manually. If the 
formula for the sum of an arithmetic progression is known, check the results. 



10 REM A COUNTING AND SUMMING PROGRAM 
20 REM INITIALISE COUNT AND SUM 
30 LET .1 = 1 
40 LET S=1 

50 PRINT "COUNT SO FAR = ";J;" WITH SUM 
60 REM UPDATE COUNT AND SUM AND REPEAT 
70 LET J = J + 1 
80 LET S-S + J 
90 GO TO 50 
100 END 


Q STOP 


Fig. 4.3. A program which 




One important use of this kind of loop is called recurrence. This arises when a sum of 
complicated terms is being found, but the clever programmer can see some relationship 
between the terms, which makes the calculation more efficient. For example suppose the 
sum is 


1 + x + x : + . . . 

A clever programmer would realise that raising a number to a power is expensive in 
terms of computer time and that each new term is just the previous one multiplied by x. 
In the program at line 120 the new term is calculated as follows: 

10 REM SUM POWERS OF X 

20 PRINT "TYPE IN A NUMBER TO SUM ITS POWERS" 

30 INPUT X 

40 REM INITIALISE COUNT J, TERM T, AND SUM S 
50 LET S = 0 
60 LET T= 1 
70 LET J = 1 
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80 REM ADD ON LATEST TERM 
90 LET S = S+T 

100 PRINT "TERM ";J;” IS ";T;" SUM IS ";S 

110 REM MOVE TO NEXT TERM 

120 LET J = J + 1 

130 LET gT'X 

140 GO TO 90 

150 END 

Example This is a famous sum. If you walk one mile today, half a mile tomorrow, and 
then each day half as far as the previous day, do you ever get to a destination which is two 
miles away? This little program uses recurrence to compute the new distance travelled 
each day, and the total covered so far: 

10 REM DO THE SUM IB 1/2 + 1/1 
20 LET D== 1 
30 LET M= 1 
40 LET S = 0 

50 PRINT "TODAY IS DAY ”;D;” AND YOU WALKED ”;M;" MILES." 

60 LET S = S+M 

70 PRINT "YOUR JOURNEY SO FAR IS ”;S;" MILES IN TOTAL." 

80 LET D = D+ 1 
90 LET M = M/2 
100 GO TO 50 
110 END 

Exercise For x between —1 and 1 the series l+x + x“ + . . . taken to many terms 
eventually becomes the same as 1/(1—x). Try the program and check the result. What 
happens if x is 1 ? What happens if x is close to 1 ? 


5 Problems 

Problem 4.1 Write a program which prints successive powers of 2 in an endless loop. It 
will have to be stopped manually. 

Problem 4.2 Your computer will have a limit to the size of numbers it can cope 
with. Find this limit roughly by successive squaring of 10 (10, 10‘, 10 , 10 , etc.) and then 
try to locate it more accurately. You may be surprised at how large it is. 

Problem 4.3 Write a program which adds up numbers you enter at the keyboard and 
counts them as well. Each time round print the count, the sum, and the average so far. 

Problem 4.4 The Maclaurin series for e A is 

e v = 1 + x + |j/2 + x 3 /3! + x A /4l + . .. 

Discover a recurrence relationship between the terms and write a program to make the 
sum in an endless loop. 


UNIT 5 

Making decisions 


1 Introduction 

A powerful and fundamental facility of all computer languages is the ability to compare 
or test quantities in order to decide the course of the calculation. In other words, a kind 
of GO TO can be arranged to happen only when certain conditions are satisfied. This is 
probably the most important single advance to be made in any Unit and it is worth 
considerable effort. Using the material presented to the end of this Unit, most 
applications of computing are possible. The Units which follow may introduce facilities 
of great convenience, but the foundations are laid in the first five Units. 


2 Relational expressions 

So far the expressions encountered in BASIC have been those of simple arithmetic, 
involving the operations +, —, *, /, and A. A different kind of expression is the 
relational expression which is used to make comparisons between quantities or 
expressions. In BASIC a relational expression decides whether a relationship between 
two quantities is TRUE or FALSE. 

For example the relational expression 


A>10*B 


will be TRUE if A is greater than 10*B, otherwise it is FALSE. TRUE and FALSE are 
the only possible results of a relational expression. 

The general form of a relational expression is 

arithmetic relational arithmetic 
expression operator expression 

Therefore any two arithmetic expressions can be compared. The available relational 
operators are 


> greater than 

< less than 


equal to 


greater or equal 
less or equal 
<> not equal 
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Examples 


10 >10 


10 =10 
5 @6 
A =B 


is FALSE B A2 — 4*A*C <0 only one of these 

is TRUE B 2 -1 *A*C • 0 can be TRUE, 

is TRUE B A 2 — 4*A*C >0 

is TRUE if A equals B, 

otherwise FALSE 


3 Decisions—the IF ... THEN statement 

The IF . . . THEN statement uses a relational expression to make a decision about 
whether or not to jump to a chosen line number. This allows programs to determine their 
own course of events based on conditions that arise when running. The form of the IF . . . 
THEN statement is 

line number a IF relational expression THEN line number b 

Here line number a is the line number of the statement itself. When the computer 
encounters it a decision is made about which line to execute next. If the relational 
expression is TRUE, the computer jumps to line number b as if a GO TO had sent it 
there. If the relational expression is FALSE, then the next line in sequence after line 
number a is executed next in the normal way. 

Example 

20 IF 1 = 10 THEN 50 

30 

40 

50 

In this example, when execution reaches line 20, the value of I is compared to 10. If 
1=10 then the program jumps to line 50. Otherwise it continues in the usual way with 
line 30. Therefore a way of skipping directly to line 50 has been provided if 1= 10 at line 
20. 

Example The counting program which was presented in Fig. 4.2 can be made to stop 
after the fifth term by replacing line 70 with 

70 IF J< = 5 THEN 40 

which produces the program shown in Fig. 5.1. 
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10 REM A COUNTING PROGRAM 
20 REM ASSIGN THE FIRST VALUE 
30 LET J = 1 
40 PRINT J 

50 REM REPLACE J BY J+l AND REPEAT 
60 LET J = J + 1 
70 IF J < = 5 THEN 40 
80 END 


An II . THEN 


In introducing the IF . . . THEN facility it is necessary to make a few remarks about 
program style. Armed with this decision maker it is possible to create very involved 
programs, but it is poor style to have a more compex structure than is necessary. Good 
programs generally read from the top down without involved jumps back and forth. One 
fault shared by many inexperienced users is a tendency to follow an IF . . . THEN 
immediately by an unnecessary GO TO. Looking again at the counting program, Fig. 4.2, 
the change could have been made to have a new line 65: 

65 IF J>5 THEN 80 
70 GO TO 40 

This is terrible style as can be seen by considering how this would complicate the 
flowchart of Fig. 5.1. 

While standards of documentation may vary considerably, flowcharts are often used. 
They are used by many programmers in the design of programs of any complexity, and 
the finished programs are sometimes documented by a complete flowchart. Figure 5.2 
shows the meaning of the various flowchart shapes used in this text. 

Example Here is a program which takes three numbers A, B and C and arranges them 
in order so that A«SB<C. Do you see the purpose of the temporary variable T? 
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S' BEGINNING ' 
V PROGRAM 


) 



PROCESSING 



10 REM PLACE A, B, C IN ORDER 

20 PRINT "ENTER THREE VALUES TO BE ORDERED” 

30 INPUT A,B,C 

40 REM REORDER A AND B IF REQUIRED 

50 IF B>A THEN 110 

60 REM SWITCH A AND B 

70 LET T = A 

80 LET A = B 

90 LET B = T 

100 REM DOES C GO BEFORE A? 

110 IF C>A THEN 190 

120 REM PUT C BEFORE A 

130 LET T = C 

140 LET C = B 

150 LET B = A 

160 LET A~T 

170 GO TO 250 

180 REM OTHERWISE DOES C GO BEFORE B? 

190 IF C>B THEN 250 
200 REM PUT C BEFORE B 
210 LET T = C 
220 LET C = B 
230 LET l|pjT 

240 REM ALL FINISHED, SHOW THEM OFF 
250 PRINT ’’HERE THEY ARE IN ORDER ”;A;B;C 
260 END 

Exercise The program just given to order A, B and C is called an insertion sort, 
because it inserts first B and then C in the correct place. Make a flowchart of it. Can you 
think of other ways of placing three values in order, and make BASIC programs to do it? 
Try for a method whose flowchart is as straiehtforward as nossihle 
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4 A real problem—Newton’s method 

It is now possible to attempt some more interesting calculations. Because of the decision 
making feature these programs will be more complex than before. In this section, the 
procedures involved in designing and implementing a fairly typical numerical problem 
are gone over in some detail. 

The problem to be considered is the Newton —Raphson method for solving an equation 
such as 


Ax) 

to find values of x which satisfy the equation. The method is based on the simple 
notion that if a guess is made at the answer, the slope of the function can be used to find 
a better answer by pretending the function is a straight line. 

In Fig. 5.3, at x=g (for guess)/is the function value and p is the slope. Then a better 
guess will be at b where it can be shown that 

b = g-f/p 

All that is needed is an equation for/(x) and its slope p. 

Consider the specific problem now of finding the square root of 2. The function fix) 
becomes 
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which has the solution yj 2. The slope of this function is 2x. Therefore, to find yj 2, a 
guess g is made, and the slope is calculated at g. A better guess b is then calculated from 
it. Then we do this again, using b as the guess so that a further improved approximation 
to the root can be calculated. We use the same statements each time around to give 
better and better values of b - and this is another example of recurrence. 

To implement this method, first a flowchart is drawn to make sure that the procedure is 
understood. The flowchart for this example is shown in Fig. 5.4. Particular notice should 
be taken of the replacement of g by b in the return path. This causes each improved 
estimate to be used again so that further improvements are obtained automatically. As a 
matter of good practice, it should be noted that the programmer has decided to print the 
results of every calculation in the procedure. This is always worthwhile because new 
programs are almost certain to contain mistakes. A liberal spread of PRINT statements 
throughout a calculation is always useful. To find mistakes in a program it is essential to 
be able to locate where trouble first appears, and this can only be done with a generous 
amount of information. 

In order to translate Fig. 5.4 into BASIC, suitable variable names are chosen, in this case 

F to represent y(x) G to represent g, the guess 

P to represent p , the slope B to represent b , the better guess 
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By referring to the flowchart, the program can be written out in skeleton form and 
checked carefully before it is typed in at the keyboard and tried. The following is a 
possible solution: 

10 PRINT "TYPE IN A GUESS AT SQR(2)” 

20 INPUT G 
30 LET F--G*G 2 
40 LET P = 2*G 
50 LET B = G-F/P 

60 PRINT "AT ”;G;” F IS ";F;” SLOPE ”;P;” NEW GUESS ";B 
70 LET G = B 
80 GO TO 30 
90 END 

The next stage is to dress the program up with REM statements so that it can be 
understood if it is looked at by someone else, or indeed by the original programmer after 
the passage of time. This example is considerably improved by the addition of remarks: 

10 CALCULATION OF SQR(2) BY NEWTON’S METHOD 
20 REM BY SOLVING XA2~2 = 0 

30 REM FIRST ACCEPT AN ESTIMATE OF THE ANSWER 
40 PRINT "TYPE IN AN ESTIMATE OF SQR(2)" 

50 INPUT G 

60 REM CALCULATE FUNCTION VALUE F AND SLOPE P 
70 LET F = G*G-2 
80 LET P = 2*G 

90 REM NOW CALCULATE AN IMPROVED GUESS B 
100 LET B = G“F/P 

110 PRINT "AT ”;G ;* F IS ”;F;" SLOPE ”;P;” NEW GUESS ”;B 

120 REM USE B AS THE ESTIMATE NEXT TIME ROUND 

130 LET G = B 

140 GO TO 70 

150 END 

Exercise Try this program. As yet it has no IF . . .THEN statements. Now improve it 
in two ways. First of all, after line 40 check that the estimate is between 0 and 
2—otherwise the guess is silly. Secondly before line 130 calculate how different B is from 
G, and stop if the difference is less than 0.000 01. The square root of 2 is 1.414 ... . Does 
this program work? Draw a flowchart of it. 


5 Another decider—the ON ... GO TO statement 

It is sometimes useful to be able to jump to one of several destinations in a program. The 
ON . . . GO TO statement arranges this although it is used much less often than IF . . . 
THEN. Its form is 
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line number ON expression GO TO line no a, line nob, .. . 

When this statement is reached, the expression is worked out. Then if the integer part of 
the result is 1, the program jumps to line no a , if 2 it jumps to line no b, and so on for 
however many destinations are given. If the expression turns out to be negative, zero, or 
larger than the number of destinations given, then an error has been made and a suitable 
message will appear on the screen. 

Example 

50 ON SGN(BA2-4*A*C)+2 GO TO 100,200,300 

A statement like this would be used in solving Problem 5.3. The SGN function, which is 
introduced in the next chapter, gives — 1 if the expression in brackets is negative, 0 if it is 
0 and 1 if positive. Therefore adding 2 to it gives 1, 2 or 3 for the ON . . . GO TO. 


6 Problems 

Problem 5.1 Write a program which prints successive powers of 2 and stops after 2"\ 

Problem 5.2 Rewrite the program for Newton's method to find the square root of any 
number. Only accept guesses between 0 and the number whose square root is sought. Stop 
the calculation with an IF . . . THEN statement when the the answer ceases to change 
appreciably. 

Problem 5.3 Write a program to find the roots of a quadratic equation 
ax'+bx + c= 0 where a , b, and c are given as input from the keyboard. Use an ON . . . 
GO TO statement to separate the three possible conditions that will arise in the 
discriminant. This will require some thought. 

Problem 5.4 Write a program to find the root of an equation ax’ + /?x~ + ex + £/=0 
where a , b , c , and d are given as input from the keyboard, using Newton’s method. Ask 
for help with the expression for slope if necessary. Find one of the roots of the polynomial 
x —7.8.x +18.5.x—11.3 = 0 using this program. Does it work for any guess? Draw the 
function to see why use BASIC to tabulate values of the function. 


UNIT 6 

Built-in functions 


1 Introduction 

Certain calculations tend to occur over and over again in BASIC programs, and many of 
these use the values of common functions which are not easy to compute. The calculation 
of a square root is a good example of this; it is inconvenient to write out a long program to 
do a square root every time one is needed. Like all computer languages, BASIC has built 
in ‘library’ functions which evaluate often-used functions. To find a square root the SQR 
function is used. 


2 Library functions in BASIC 


The list of functions available in BASIC varies considerably between systems. All 
versions should include the following mathematical ones: 


Function Meaning 


SQR(expression) 
ABS(expression) 
SGN (expression) 
INT (expression) 
EXP {expression) 
LOG {expression) 
SI N( expression) 
COS (expression) 
J A~N(expression) 
ATN( ex pres si on) 


Square root of expression 

Absolute value of expression 

Sign of expression: 1 if > 0, 0 if 0, — 1 if < 0 

Largest integer not greater than expression 

The value of Q xpress ‘°" 

Natural logarithm (base e) of expression 
Sine of expression, expression in radians 
Cosine of expression , expression in radians 
Tangent of expression , expression in radians 
The angle in the range — 7r/2 to 7 t/ 2 
radians whose tangent is expression 


The function RND, which is a random number generator, also appears in most versions 
of BASIC, together with the RANDOMIZE function. 

To use a function, simply write it into any expression where it is desired with its 
‘argument’ in brackets immediately after it. For example: 


20 PRINT SQR(2) 
prints the square root of 2. 


Built-infunctions 33 


3 Trying them out 

Here the functions given in the previous section are considered individually, except for 
INT which is looked at in detail later. 

(a) SQR 

The square root function saves programmers the trouble of devising a numerical method 
for finding square roots every time they need one. The only thing to remember when 
using it is that a negative number does not have a real square root. The following 
program uses SQR to find the hypotenuse of a right-angled triangle, given the other two 
sides: 


10 PRINT ’’THIS PROGRAM FINDS THE HYPOTENUSE” 

20 PRINT ’’TYPE IN TWO SIDES” 

30 INPUT A,B 

40 PRINT "HYPOTENUSE = ”; SQR(A*A + B*B) 

50 GO TO 20 
60 END 

Exercise Try this example. It will give no trouble about negative arguments. Then find 
out what happens if SQR is given a negative argument. 

(b) ABS 

This function forces the sign of an expression to be positive. It can be used to keep out of 
trouble with SQR, as in 

600 LET T = SQR(ABS(X)) 

Very often a program is interested in the size of a value regardless of its sign, and this is 
when ABS is used. In some problems in Unit 7 the size of a term in a power series will be 
used to stop adding more terms. 

(c) SGN 

Sometimes it may be important to know when a number is positive or 
negative independently of the value. Problem 5.3 was difficult without the SGN function. 
To test the discriminant of a quadratic expression Ax' + Bx+C an ON . . . GO TO 
statement can be used with 

SGN( B*B — 4*A’C) -42 

which has the values 1, 2, or 3 for negative, zero, or positive values of the discriminant. 

SGN can be used to transfer the sign of one variable to another. Suppose Z is to have the 
same magnitude as X but the same sign as Y. This can be achieved by combining the 
SGN and ABS functions as in 
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90 LET Z = SGN(Y)*ABS(X) 
which will work except when Y is zero. 

(d) EXP and LOG 

These two mathematical functions go together, and are based on e (2.718 281 828 45). 
EXP raises e to a power, and LOG finds the logarithm to the base e. Therefore if 

Y = EXP(X) then X = LOG(Y) 

The log function can easily be used to base 10 or any other base by recalling that 

log, X = log e X log a e = log e X 
log e a 

so that the log of X to base 10 could be found using a statement like 
110 LET L = LOG(X)/LOG(10) 
or to base a by 

110 LET L = LOG (X) / LOG (A) 

Exercise Print the value of e. 

(e) SIN, COS and TAN 

These trigonometric functions of an angle, as illustrated in Fig. 6.1, are often used. In 
BASIC the angle is in radians and this may not always be convenient, although 
conversion is easy since x radians is the same as 180°. A simple way to calculate x is 
mentioned under the ATN function which follows. 

Exercise Check using the BASIC functions for a few angles that 

(i) sin"* + cos" x = 1 (ii) tan x = sin X / cos x 

(f) ATN 

The ATN or arctangent function is one which can give conceptual difficulty. The 
argument of the function is the value of a tangent, and the result is the angle that goes 
with it. For example the tangent of 45° is 1. Therefore the function 

ATN(1) 

gives the angle in radians whose tangent is 1, i.e. x/4 radians. This useful result can be 
used to convert degrees to radians and vice versa. 
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Often the value of ir is wanted. This can be derived by writing 
100 LET P = 4*ATN( 1 ) 

There is an ambiguity in the ATN function because if the tangent is x, then the angle 
could be A , say, but also A±Tr/2, A±ir, and so on. This is why the ATN function gives 
an answer between — 7r/2 and ir/2, which is an unambiguous range as can be seen in Fig. 
6 . 1 . 

Using this information, it is easy to see that the following statement converts D in 
degrees to R in radians: 

200 LET R = D*ATN( 1) /45 

and this converts R in radians to D in degrees: 

300 LET D = R* 45 /ATN( 1 ) 


4 Truncation and its uses 

Probably the most useful function of them all is the INT function. Precisely speaking, 
INT(x) provides a value which is the largest integer which is not greater than x. 
Accordingly 

INT(5.95) is 5 and INT(-5.95) is -6 
Look carefully at the second example. 

(a) Rounding 

Often it is necessary to round a result to the nearest whole number, or to a certain 
number of decimal places. Although INT does not do this directly, it is easily forced to do 
so. To round x to the nearest whole number, simply add 0.5 before using INT: 
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400 LET Y= INT(X + 0.5 ) 

A simple extension to this idea enables rounding to be taken to any scale. Scale the data 
so that the resolution desired is represented by successive integers, add 0.5, use INT and 
then reverse the scaling. 

Examples 

(i) Round to two decimal places (to the nearest 0.01): 

400 LET Y= INT(X*100 + 0.5)/100 

(ii) Round to the nearest 100: 

400 LET Y— INT(X / 100 + 0.05 ) * 100 

(iii) Round to the nearest 4: 

400 LET Y = INT(X/4 + 0.05)*4 
(b) Truncation 

The term truncation applies to the removal of decimal places, and so the function INT as 
it stands is not quite a truncation because of its operation on negative numbers. However 
the expression 

SGN(X)*INT(ABS(X)) 

does truncate X, as does INT itself for positive numbers. 

Truncation is useful when the remainder after division is required. This happens when 
numbers are being converted from one base to another and when units are being 
converted. In dividing 22 by 7 the integer part of the quotient is 3 and the remainder is 1. 
If the quotient were N/D with N positive, then the integer part would be 

INT(N/D) 

and the remainder 

N —INT(N/D)*D 

However if N or D could be negative, the integer part would be 


SGN(N/D)*INT(ABS(N/D)) 
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and the unsigned remainder is 

ABS (N) — I NT (ABS ( N/D) ) * ABS (D) 

(c) Base conversion 

To convert numbers between bases, the old number is divided by the new base over and 
over again with the remainders forming the number in the new base. 

Example 131 decimal to base 7: 

Step 1 131/7 = 18 remainder5 

Step 2 18/7= 2 remainder 4 

Step 3 2/7 = 0 remainder 2 

The answer is 5 units, 4 sevens, and 2 forty-nines, i.e. 245 in base 7. 

(d) Units conversion 

There are many cases of units of measurement with mixed bases, particularly in the 
English system. For example a time measurement in days, hours, minutes and seconds is 
in bases 24, 60, and 60. To convert 18.43 days into hours, minutes, and seconds requires 
the following BASIC statements: 

100 REM GET WHOLE HOURS 
110 LET H= INT(24*18.43) 

120 REM REMAINING PART HOUR 
130 LET R=18.43*24-H 
140 REM WHOLE MINUTES 
150 LET M~INT(60*R) 

160 REM REMAINING PART MINUTE 
170 LET R = 60*R —M 

180 REM FINALLY SECONDS WITH DECIMAL PLACES 
190 LET S = 60*R 

At the end the time is in variables H, M, and S. 


5 Random numbers 

The function RND looks up a number between 0 and 1 which is apparently random. It 
isn't actually random, it just appears to be. There are some variations in the way that 
RND has been implemented on different computers. This section follows the standard. 

RND should be written without an argument. This little program will print ten 
apparently unrelated numbers: 
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10 REM GET SOME RANDOM NUMBERS 40 LET 1 = 1+1 

20 LET 1 = 1 50 IF I<I1 THEN 30 

30 PRINT RND 60 END 


If it won’t work, it is probably because the particular computer requires an argument. 
Try RND(O) if that is the case. 

Running this RND program several times should produce the same numbers each time. 
If different numbers are required each time, put in the RANDOMIZE statement which 
tells RND to select an apparently random starting number. This program tosses a coin 
ten times: 

10 REM TOSS A COIN 
20 RANDOMIZE 
30 LET 1 = 1 
40 LET C = RND 
50 IF C<0.5 THEN 80 
60 PRINT ’’TAIL” 

70 GO TO 90 
80 PRINT ’’HEAD" 


90 LET 1 = 1 + 1 

100 IF I<11 THEN 40 

110 END 


6 Problems 

Problem 6.1 The period T seconds of a pendulum of length / metres for a small angle of 
swing is 


7'|| 2ir y/l/g 

where g = 9.81 metres per second per second, the acceleration due to gravity. 

(a) Write a program to find the period from the length. 

(b) Write a program to find the length from the period. 

Check these programs against each other. 

Problem 6.2 Given two sides adjacent to the right angle in a triangle, calculate the 
length of the hypotenuse and find the other two angles in degrees. 

Problem 6.3 Write a program to convert a decimal number to any base from 2 to 9. Do 
this in a loop; it is acceptable that the results are produced in reverse order. Make it work 
for positive or negative numbers. 

Problem 6.4 Write a program using RANDOMIZE and RND to throw two dice and 
report the sum of their spots. 


UNIT 7 
Program loops 


1 Introduction 

In many earlier problems and examples, programs were encountered which included 
repeated calculations or loops. It has been seen how an IF . . . THEN statement is used 
to control a loop. In many calculations the number of repetitions of a loop is known 
before the loop, and in these cases BASIC has a special facility for organising them. 


2 Forming a loop 

Many programs require calculations to be repeated a fixed number of times. Loops can 
be set up and controlled using a LET statement for initialisation and counting, and later 
on an IF . . . THEN statement to test for completion. Initialisation, counting, and testing 
are the common features of a counting loop. 

Suppose a calculation is to be repeated 10 times. A variable I can be set aside to count 
the number of times the loop has been executed. Before the loop is entered, I is initialised 
by being set to one. Each time the end of the loop is reached, I is increased by one and 
then tested to see if the loop is complete. Figure 7.1 illustrates a typical flowchart for 
looping. + 


INITIALIZE 



INCREMENT 


LET I = 
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3 The easy way—the FOR and NEXT statements 

BASIC has two special statements to make loop formation easier for a programmer. The 
definition of the loop is accomplished by a FOR statement which gives all the 
information about the initial and final values of the counter and the step size in between. 
The NEXT statement identifies the end of the loop. 

As an example, suppose a variable I is to be used to count 10 passes around a loop. The 
FOR and NEXT statements could be as follows: 

70 FOR 1 = 1 TO 10 
90 

100 (a calculation) 

110 

130 NEXT I 


The convenience of this is obvious. The general form of the FOR statement is 


line number FOR variable = expression TO expression STEP expression 

Example The FOR and NEXT statements often make summation very easy. This little 
program adds up the numbers from 1 to 12. It tells you how many gifts you receive on the 
twelfth day of Christmas according to the famous carol: 

10 REM ADD THE NUMBERS FROM 1 TO 12 

20 REM USE S FOR THE SUM AND G FOR THE GIFTS 

30 LET S = 0 

40 FOR TO 12 

50 LET S = S+G 

60 NEXT G 

70 PRINT "THE SUM OF THE INTEGERS FROM 1 TO 12 IS ”;S 
80 END 

The meaning of the FOR statement should be quite clear although there are a number of 
rules of detail which the following points should clarify: 

(i) A variable name must be used as the index or loop counter. It does not have to be 
referred to in the calculation itself, as in this example using K as a counter: 

10 FOR K= 1 TO 5 
20 PRINT "LOOP” 

30 NEXT K 

(ii) The initial and final values are given in the FOR statement. 
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(iii) The STEP part is optional. If STEP is left out, the step size is 1. It can be fractional 
or negative, as in 

10 FOR X = 0.25 TO 1.50 STEP 0.25 


NEXT X 


and 


200 FOR P= 10 TO 1 STEP -1 


530 NEXT P 

(iv) The limits and the step size can be any expression. 

(v) If the initial, final, and step values are such that the loop should not be executed, it is 
jumped over according to the BASIC standard. Unfortunately this rule is not always 
followed, and many versions of BASIC run through the loop once anyway. In standard 
BASIC the message in this short program should not be printed. Try yours and see: 

10 FOR J = 2 TO 1 

20 PRINT "THIS SHOULD NOT BE PRINTED” 

30 NEXT J 
40 END 

(vi) The initial, final, and step values are considered only when the loop is entered the 
first time so that they cannot later be altered. For example 

50 FOR I = J TO K STEP L 
60 LET L = L*2 
70 LET K = K-1 
80 NEXT I 

If J, K, and L are 1,10, and 1 the loop is repeated 10 times. The changes made to K and 
L inside the loop do not alter this. 

(vii) The value of the loop variable itself can be changed inside the loop and this will 
affect its operation. For example 

50 FOR 1 = 1 TO 10 
60 LET fsl+l 
70 NEXT I 
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is only repeated 5 times. Be sure that the difference between this and rule (vi) is 
understood. 

(viii) Computers can make slight errors when dealing with non-integers, and fail to hit 
an exact final value which could mean the loop will be executed an extra time. For 
example 

10 LET T = ATN(1) 

20 LET S = T/7 
30 FOR I = S TO T STEP S 
40 PRINT I 
50 NEXT I 

might be executed 8 rather than 7 times because the seventh time S is added to I, it 
might fall fractionally short of T. If it does work, then this alternative probably will not: 

30 FOR I =T TO S STEP -S 

(ix) Loops can be abandoned; an IF . . . THEN or a GO TO within the loop could 
make the program leave it entirely. 

(x) A loop should never be jumped into from outside. Even if it works, it is usually 
unnecessary and is considered to be poor style. 

(xi) After leaving a loop the normal way, by dropping through the NEXT statement, 
the index has been incremented and is available. For example 

10 FOR 111 1 TO 5 
20 NEXT I 
30 PRINT I 

will print the value 6. 


To match every FOR statement there must be a NEXT statement. The NEXT 
statement takes the form 

line number NEXT variable 

which indicates the end of the loop. The named variable is the same loop index as 
appeared in the FOR statement. 

Example The factorial of an integer is the product of all integers up to and including 
the number. The factorial of 0 is 1. Here is a program segment to evaluate the factorial 
of N which works for 0 and any positive integer. 
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80 REM EVALUATE FACTORIAL N 
90 REM INITIALISE FACTORIAL 
100 LET F= 1 

110 REM FORM PRODUCT OF ALL INTEGERS TO N 

120 IF N = 0 THEN 160 

130 FOR K = N TO 1 STEP -1 

140 LET F = F*K 

150 NEXT K 

160 PRINT "FACTORIAL IS '\'F 


4 Nesting FOR and NEXT loops 

Programs will often require several loops contained within one another. This is allowed 
by BASIC as long as they do not overlap, because if they did the intention of the 
program would be ambiguous. If they are correctly arranged they are said to be nested. 
Two examples serve to illustrate correct and incorrect arrangements. 

Correct Incorrect 

The loops are ‘nested' The loops cross 

10 FOR 1 = 1 TO 10 10 FOR IH TO 10 


30 FOR J = 1 TO 5 


50 NEXT J 


70 NEXT I 


30 FOR J = 1 TO 5 


50 NEXT J 


70 NEXT J 


The same variable cannot be used as a counter in nested loops, as follows: 


10 FOR iH TO 10 
30 FOR 1 = 1 TO 5 not allowed 

50 NEXT I 
70 NEXT I 

Example Now we can do the sum of sums. On day D of Christmas, the number of gifts 
arriving is the sum of the integers from 1 to D. After twelve days of this, the grand total 
is the sum of all these sums: 
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10 REM THE SUM OF SUMS FROM 1 TO 12 
20 LET S = 0 

30 FOR I) = 1 TO 12 60 NEXT G 

40 FOR G=1 TO D 70 NEXT D 

50 LET S= S + G 80 PRINT "THE SUM OF SUMS TO 12 IS ";S 

90 END 

Example Here is a program which prints a table of compound interest return on 100 
units invested at 6%, 7%, 8%, and 9% for up to 10 compoundings. The return r on 
principal p invested at i% for n periods is 

r = /K1+//100)" 

which is evaluated in nested loops for / from 6 to 9 and for n from 1 to 10. 

100 REM PROGRAM TO PRINT INVESTMENT TABLE 
110 PRINT ” TABLE OF RETURN ON INVESTMENT 

120 PRINT 

130 PRINT "RATE ”,6,7,8,9 

140 REM REPEAT ON NEW LINE FOR 1 TO 10 PERIODS 
150 FOR N= 1 TO 10 
160 PRINT ’’PERIOD ”;N; 

170 REM PRINT ON ONE LINE FOR RATES 6 TO 9 
180 FOR 1 = 6 TO 9 
190 PRINT 100*(1+I/100)AN, 

5 Problems 

Problem 7 .1 The Maclaurin series for sin x is 

sin v p‘! - .v'/3! Tx/S! “ ft’/7! + . . . 

Write a program to evaluate 10 terms of this and compare it with the built-in SIN 
function for various values of x. 

Problem 7.2 Now improve on the solution to 7.1. Be sure an efficient recurrence is 
being used. Before evaluating the series, scale x into the range -ir to 7r using a 
remainder. Limit the loop to however many repetitions are certain to produce a result 
correct to 5 figures for any value of v, but jump out of the loop earlier if the error 
indicated by the most recent term is small enough. 

Problem 7.3 An example in this Unit shows how to calculate a factorial N!. The 
formulae for permutations and combinations are 

„P, = number of arrangements (permutations) of n things taken 
r at a time 

= n\ 

(«-/■)! 


200 NEXT I 
210 PRINT 
220 NEXT N 
230 END 
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n C r = number of combinations of n things taken r at a time 

= n\ 
r\{n~r)\ 

Write programs to calculate „C, and n P r where n and r are typed in. 

Problem 7.4 Calculate and print nCr for n = 0, 1, . . 10 and r = 0, 1, . . ., n. Copy the 

PRINT arrangement from the investment table example to make all the results for a 
given n appear on the same line. 

Problem 7.5 A prime number is one which has no factors other than itself or unity. For 
example 33 is not a prime number since it has factors 3 and 11.3 and 11 are themselves 
prime numbers. Write a program to determine whether a number typed in is prime. To 
find out if a number i is prime, test for a zero remainder after division by every integer 
from 2 to i —if any is found, i is not prime. 

Problem 7.6 Write a program to find and print all the primes less than 100. 

Problem 7.7 Write a program to find all the prime factors of a number. 

Problem 7.8 One method of finding the area under a curve is the trapezoidal rule; see 
Fig. 7.2. 

The area a of the shaded trapezoid is 

a ! J{x ) - ./{a ) (.v, - x,) 

- 2 —- 

By dividing the range 0<Jf<l into N trapezoids, find the area under the curve 
EXP(x /2) from x = 0 to x = 1. N is to be typed in. How big must N be for 0.1% 
accuracy? 








UNIT 8 

Printing and graph plotting 


1 Introduction 

The PRINT statement provides several ways of controlling the layout of lines of output. 
These days it is most likely that ‘printing’ is done on a screen rather than a printer, but 
the principles are the same. Some of these features have been demonstrated already, and 
the remainder are described here. In simple BASIC the placement and spacing af 
numerical output can be controlled only to a limited extent. However, in a different way 
BASIC is highly versatile in the facilities which allow graphs to be plotted and lines of 
output to be continued from one PRINT statement to the next. 


2 Another look at the PRINT statement 

In BASIC there are three means of controlling the alignment of printed information: the 
comma and semicolon as ‘separators’ and a special function, the TAB function. These are 
all used in the PRINT statement, whose general form can now be stated: 

line number PRINT quantity separator quantity separator 

where quantity can represent expressions of any complexity, character strings, or the 
special TAB function, and separator can be a comma or a semicolon. 

Example 

75 PRINT A, B+CiTAB(D);"CHARACTER STRING " 


3 Printing with commas 

Whenever quantities to be printed are separated by commas, BASIC divides the output 
line into a number of zones. The number of zones and their width will vary between 
computers, but would typically be 5 zones of 15 spaces if the printer or screen is wide 
enough. Numbers are always printed in the same zones regardless of their size or type of 
presentation. In this way BASIC can print tables whose columns will always be aligned. 

Exercise Investigate the printing of numbers by BASIC: 

(i) Look at how whole numbers (integers) are presented. Find out how large they are 
before they are printed in exponential format. 
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(ii) Look at non-integers and their printing in exponential format. 

One new feature of printing with commas is the ability of BASIC to continue new 
statements on the same line, as in 

60 FOR 1 = 1 TO 5 
70 PRINT I, 

80 NEXT I 
90 END 

which will print the five values of I on the same line. To force a new line, use another 
PRINT statement, as in 

10 FOR TO 5 

20 FOR J = 1 TO 5 
30 PRINT I, 

40 NEXT J 
50 PRINT 
60 NEXT I 
70 END 

Exercise Try this new feature. 


4 Printing with semicolons 

If a semicolon is used in place of a comma in PRINT statements, then the output is 
squeezed together. The result is that more numbers can be printed on a line. 
Unfortunately the size of the zones varies according to the number of digits in the result. 
Therefore to get results laid out as tables, the comma is better. The semicolon is used 
when the printed results are intended to be squeezed together, for example when a 
numerical result follows a message. This has been used often in the examples in earlier 
chapters. To fc low a message by a value, end the message with a space: 

10 PRINT "THIS IS ": 2 

The other way around, the space is not necessary in most versions of BASIC, because a 
number ought to end with a space. This point should be checked: 

10 PRINT 2; "IS THERE A SPACE?" 

Another use of the semicolon is in continuing printed output on the same line with 
several PRINT statements. If a semicolon is used as separator after the last quantity in a 
PRINT statement, then the next PRINT statement to be obeyed will continue on the 
same line, as in 
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10 FOR 1 = 1 TO 10 
20 PRINT I; 

30 NEXT I 
40 END 

A PRINT statement with nothing to print will cause a new line, as would any PRINT 
statement without a separator on the end: 

10 FOR 1 = 1 TO 5 
20 PRINT I; 

30 FOR J = 1 TO 5 
40 PRINT J; 

50 NEXT J 
60 PRINT 
70 NEXT J 
80 END 

This same feature is useful when requesting input from the keyboard, A message can be 
given with a PRINT statement ending with a semicolon. The prompt and response to the 
INPUT statement will then follow on the same line. This makes a convenient and neat 
dialogue, as in 

30 PRINT "WHAT IS N .. "; 

40 INPUT N 

Example This program prints a little pyramid: 

10 REM MAKE A PYRAMID - FIRST HALF 

20 REM L IS THE LINE NUMBER 

30 FOR L =1 TO 12 

40 REM C IS THE COLUMN NUMBER 

50 FOR C= 1 TO L 

60 PRINT 

70 NEXT C 

80 REM MOVE TO NEXT LINE 
90 PRINT 
100 NEXT L 

110 REM AND SO ON FOR THE SECOND HALF 

120 FOR L= 11 TO 1 STEP -1 

130 FOR|I 1 TO L 

140 PRINT 

150 NEXT C 

160 PRINT 

170 NEXT L 

180 END 


Exercise Try these features. 
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5 Print zoning—the TAB function 

When the special TAB function and the semicolon are used together, a large measure of 
control over output zoning and graph plotting is available. TAB is a special function 
which can only be used in PRINT statements. It appears with a single argument such as 
TAB(x), where x could be an expression of any complexity. It causes the output to move 
along the printed line to the column given by the integer part of x, which should be an 
existing column number. TAB(x) is normally followed by a semicolon so that printing 
will begin in the next space, i.e. at column INT(.v)+l. If TAB(.v) were followed by a 
comma, then the output would move to the beginning of the next ordinary field which is 
usually wrong. 

TAB can therefore place a number or a message exactly where it is wanted. 

Exercise Try the following example: 

10 FOR 1=1 TO 10 
20 PRINT TAB(I);I 
30 NEXT I 
40 END 

It is important to know that the TAB function cannot move the printer backwards on the 
same line, and if it is attempted it will move to a new line. TAB always gives a column 
number, not a number of columns, so to move to column 60 from column 50, TAB(60) is 
used (not TAB(10)). 


6 An example—displaying Pascal’s triangle 

Pascal’s triangle is the arrangement of the coefficients of binomial expansions in 
triangular form as shown in Fig. 8.1. 
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The quantity JjK was defined in Problem 7.3 as 

,€§§ n\ 

r\(n~r)\ 

from which in the search for efficiency, a recurrence can be found: 
„C, = n - r+ \ ,C , 


which makes it unnecessary to find any factorials! To print the first line, send the printer 
back to column 35 before printing {) C t) . Using the TAB function, force each number to use 
only six spaces, and start each new line three spaces further back than the one before it. 
This way the output will be nicely lined up. Therefore line n begins at column 35 — 3 n and 
the number C r is in column 35 — 3/7+#. The complete program to display 10 lines of 
Pascal’s triangle is: 

100 REM A PROGRAM TO PRINT PASCAL’S TRIANGLE 
110 REM N IS LINE NUMBER 
120 FOR N = 0 TO 9 

130 REM PRINT THE FIRST VALUE ON EACH LINE 
140 LET C = 1 

150 PRINT TAB(35—3*N);C; 

160 REM NOW THE REMAINDER OF LINE N IF ANY 

170 IF N = 0 THEN 230 

180 FOR R= 1 TO N 

190 LI Tj 'Q.—(?!* (N — R + l)/R 

200 PRINT TAB(35 —3*N + 6*R) ;C; 

210 NEXT R 

220 REM MOVE TO A NEW LINE 
230 PRINT 
240 NEXT N 
250 END 

Exercise Run this program. 


7 Line graphs 

In output zoning, character strings can be treated like any other quantity. Therefore the 
TAB function can be used to move the display to a desired column where a character 
string can begin. This enables graphs to be plotted; the output is advanced to the correct 
place and a symbol is printed. To make the a graph fit the number of spaces available 
usually requires some scaling. 

As an example, a straight line can be plotted easily by printing in column one of the first 
line, column two of the second, and so on. The program could be 
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10 FOR 1 = 1 TO 10 
20 PRINT TAB(1);"* " 

30 NEXT I 
40 END 

The line of symbols that this makes is the graph. As a more complicated example, a 
cosine wave is displayed of amplitude 25 print positions and period 20 lines. If I is the line 
number from 0 to 19, then the function is 

25 cos 27rl 
20 

but it must be displaced to prevent it from going off the screen to the left. The constant 
2ir/20 is calculated in advance using the ATN function. Here is the program; note that 
the column number is ‘rounded’ by the addition of 0.5. 

10 LET T=8*ATN(l)/20 40 NEXT I 

20 FOR 1 = 0 TO 19 50 END 

30 PRINT TAB( 25.5 + 25*COS (T*I) ) ; 

Exercise Try these programs. The cosine graph is lying on its side. 


8 Plotting bar graphs 

A bar graph has a shaded or solid line drawn in each position. In BASIC a program 
calculates where to begin and how many symbols make up the bar before producing it in 
a FOR . . . NEXT loop. It is quite similar to the way we made our little pyramid. An 
example of a shaded straight line beginning in column 30 is: 


10 

FOR 1=1 TO 10 

50 

20 

PRINT TAB(30); 

60 

30 

FOR J = 1 TO I 

70 

40 

PRINT .; 

80 


NEXT J 
PRINT 
NEXT I 
END 


9 Problems 


Problem 8.1 Plot a full cycle of a sine wave of amplitude 30 print positions and period 
30 lines. 


Problem 8.2 To a suitable scale plot the polynomial 
/i» = x 3 - 7.8x + 18.5x - 11.3 

Problem8.3 Plot a full cycle of a cosine wave with the x-axis shown. 

Problem 8.4 Plot a full cycle of a cosine wave and a sine wave together with the x-axis 
shown. 


UNIT 9 

Defining functions 


1 Introduction 

The standard built-in functions of BASIC have already been introduced. These cover the 
most common and important requirements for functions. In addition to these it is possible 
for a program to define its own functions in a restricted but useful way. Functions can 
shorten or simplify programs by replacing similar expressions which occur frequently in 
a program. 


2 Defining functions—the DEF FN statement 

A one-line function definition can be inserted in a BASIC program by the DFF FN 
statement: 

line number DEF FNa( variable) = expression 

The function name is FNa, where a can be any letter of the alphabet, so that the 26 
available names are FNA, FNB, . . . , FNZ. A given name can only be defined once but 
can be referred to as often as is desired. The definition must come before the first 
reference to the function. 

The variable in brackets is the argument of the function, and is called a ‘dummy 
argument’ because the variable name used in the DEF FNa statement is not the variable 
whose value is used when the function is referred to. The argument will normally appear 
in the right hand side expression but need not. When the function is used by a running 
program, the expression on the right hand side is evaluated with the value of the 
argument substituted for the variable in the function definition. A function can have one 
argument, or no arguments. 

This may sound quite complicated but is really simple and will be illustrated by several 
examples. 

Example The area of a circle is irr 2 , where r is the radius. A function can be defined to 
find the area of any circle by a statement like 

30 DEF FNC(R)= 4 *ATN(1)* R * R 

which calculates the area of a circle given its radius as argument. Elsewhere in the same 
BASIC program this could be used, for example 
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45 PRINT "RADIUS ";X;" AREA ”;FNC(X) 

so that a complete program to print the areas of circles of radius 1.0, 1.1, . . . , 1.9, could 
be 


10 REM PROGRAM TO FIND AREAS OF CIRCLES 

20 REM DEFINE AREA FUNCTION 

30 DEF FNC(R) = 4*ATN(1)*R*R 

40 REM NOW WORK OUT AREAS 

50 FOR X= 1.0 TO 1.9 STEP 0.1 

60 PRINT "RADIUS ";X;" AREA ";FNC(X) 

70 NEXT X 
80 END 

It should be clear how the function is defined using a dummy variable R and later 
referred to using an actual argument X. 

The argument of a function need not be used. The standard for BASIC suggests that a 
function with no arguments can be used, but not all implementations allow this. Functions 
can refer to other functions but a function cannot refer to itself, nor can an endless loop 
of functions be permitted. 

Example The evaluation of tv could be made by a function FNP: 

25 DEF FNP = 4*ATN( 1 ) 

in which case the previous function definition could itself use the defined function FNP: 
30 DEF FNR(R)=FNP*R*R 

Here the function FNP has no argument. If a particular computer does not like this, put 
any convenient variable name in the definition: 

25 DEF FNP(Z) = 4 *ATN( 1) 

and when it is used 

30 DEF FNR(R)= FNP(Z)*R*R 

Example The function FNT provides a true truncation of its argument: 

60 DEF FNT(X)= SGN(X)*INT(ABS(X)) 

Example The function FNR rounds its argument to the nearest integer: 


70 DEF FNR(X) = INT(X + 0.5) 
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On the right hand side of a function definition, variables may be used which are not 
arguments of the function. If this is done, the real value of the variable is used. To 
illustrate this, consider rounding to a particular accuracy as was illustrated in Unit 6. 

Example The function FND rounds its argument X after scaling by a scale factor S, so 
that S defines the precision of the scaling. After rounding, X is restored to its original size 
but is now rounded to the nearest S. 

40 DEF FND ( X) = ( I NT (X)/S + 0.5)*S 

so that with S = 100 rounding is to the nearest 100; with S = 0.01 rounding is to two 
decimal places. 

Example The function FNT throws two dice using the built-in RND function. In this 
little program, it is used to count the number of 7’s that turn up in 100 throws. 

10 REM THROW THE DICE 100 TIMES AND COUNT THE 7’S 
20 DEF FNT= 1NT(RND*6 + 1 ) + INT(RND*6 + 1 ) 

30 REM INITIALISE THE COUNT 
40 LET N7 = 0 70 if FNT<>7 THEN 100 

50 REM NOW THROW 80 REM YES, WE HAVE A 7 

60 FOR T=1 TO 100 90 LET N7 = N7+1 

100 NEXT T 

110 PRINT "AFTER 100 THROWS WE HAVE ";N7;" SEVENS" 
120 END 


3 Problems 

Problem 9.1 Define functions for hyperbolic sine, cosine, and tangent and plot them 
over the range — 2<x<2. 

sinh x = e* — e ' cosh x = e' + e ' tanh xHbinh_x_ 

2 2 cosh x 


Problem 9.2 Define a function for arc sine using a suitable range of angles. 

Problem 9.3 Define a function for arc cosine using a suitable range of angles. 

Problem 9.4 Define a function to transfer the sign of a variable S to the function 
argument. Try to make it work for S = 0. 

Problem 9.5 Define a function to find the remainder when N, the function argument, is 
divided by D. Use this to convert 

33 to base 7 7600 to base 6 

32 767 to base 5 5100 to base 8 


UNIT 10 
Working with lists 


1 Introduction 

Most computing languages provide what is called an array facility; a means of organising 
a list of values under only one variable name. A program can refer to any member of the 
list by the use of a subscript, and by varying the value of the subscript a common 
calculation can be applied throughout the list. 


2 Lists and subscripts 

In BASIC an ordered set of values can be given one variable name and treated as a list. 
A particular member of the list can be selected by the use of a subscript. BASIC 
automatically recognises a variable as a list if it is used with a subscript, and the subscript 
itself can be any expression. The name of a list can only be a single letter. 

Examples 

A(3) refers to the third entry in the list called A 

B(I + J) refers to the (I + J)th entry in the list called B 

A subscript can be any expression, but it is obvious that it has to be interpreted as a 
positive integer. If the value of the subscript is not an integer, it should be rounded to the 
nearest integer by the computer. However some BASIC implementations truncate to the 
next lowest integer rather than rounding. To ensure that a program works on all 
computers, use only integer values as subscripts. 

Example 

C(3.75) refers to entry number four in the list called C. 

BASIC checks every subscript as it is used and if subscripts occur which are too small or 
too large the program will not be allowed to continue. The BASIC standard recommends 
that the lowest permitted subscript should be 0, but unfortunately a number of 
implementations have 1 as the smallest subscript. To make a program transportable, 
consider that 1 is the lowest subscript. 

The same variable name should not be used in both subscripted and unsubscripted form 
in a program. Unsubscripted variables of the kind used in earlier Units are properly 
called simple variables. 
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The use of lists in programs is demonstrated by a series of examples. 

Example Defining and printing a list. 

A convenient way of assigning values to a list in advance is described in Unit 12. In the 
meantime less convenient ways are used. Suppose in a prison with four cells, each 
prisoner has been given a prisoner number. The set of prisoner numbers could form a list 
in which subscripts correspond to the numbering of the cells, as illustrated by Fig. 10.1. 

The list is described as 


Subscript 

Value 

The prisoner in cell 

1 

is 631 

The prisoner in cell 

2 

is 127 

The prisoner in cell 

3 

is 458 

The prisoner in cell 

4 

is 390 


In a BASIC program, the list of prisoner numbers could be called N. Subscripts 1 to 4 
select different cells, and the prisoner numbers are N(l), N(2), N(3) and N(4). The 
following program reads in the prisoner numbers one at a time and prints them out 
again. In a FOR . . . NEXT loop the INPUT statement at line 30 refers to the cell 
numbers one at a time with subscript I. At line 60 the subscripted variable N(J) prints 
them as J varies. 


10 PRINT "TYPE IN THE PRISONER NUMBERS ONE AT A TIME” 
20 FOR 1 = 1 TO 4 
30 INPUT N(I) 

40 NEXT I 

50 FOR J-4 TO 1 STEP -1 

60 PRINT "THE PRISONER IN CELL ";J ;" IS NUMBER ”;N(J) 


70 NEXT J 
80 END 


IB 


N> ' 


m 



Fig. 10.1. A list of prisoners. 


Example Suppose now a search is to be made for the highest prisoner number. To do 
this a simple variable H is set aside and given a prisoner number from the list—N(l). H 
is then compared with each remaining prisoner number in turn. Whenever a higher 
number than H is found, this value replaces H. At the end H will hold the highest 
number. This is added on to the previous example: 
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80 REM NOW SEARCH FOR THE HIGHEST NUMBER 
90 LET H = N( 1 ) 

100 FOR 1 = 2 TO 4 120 LET H=N(J) 

110 IF H> =N( J) THEN 130 130 NEXT I 

140 PRINT "THE HIGHEST NUMBER IS 
150 END 


Exercise Draw a flowchart for this program and find the deliberate error. Correct it 
and try the program. Modify it to find the lowest prisoner number. Further modify it to 
record and print the cell number of this prisoner as well. 


Example Additional arrays can be defined to give additional facts about the prisoners. 
The length of sentence and the ages on arrival might also be of interest, defined as new 
arrays A and L, for example 


Cell 1 

Prisoner number 631 

Sentence 99 

Age on arrival 40 


2 3 4 

127 458 390 

1 53 30 

44 35 21 


The following part program is used to define these: 


10 PRINT ’’INPUT PRISONER NO., SENTENCE, AND AGE" 
20 FOR 1=1 TO 4 
30 INPUT N(I),L(I),A(I) 

40 NEXT I 


Problems using this data are found at the end of this Unit. 


3 Longer lists—the DIM statement 

In the previous examples the space taken up by a list has been ignored. BASIC should 
assume that a list contains as many as 11 values (for the subscripts 0 to 10). 
Unfortunately some implementations only allow for subscripts 1 to 10. The OPTION 
statement can be used to tell a system what the lowest subscript should be: 

line number OPTION BASE 0 or 1 

If no OPTION is given, an up-to-date version of BASIC should assume that the 
minimum is 0. This, however, is an area of confusion because: 

(i) Some versions of BASIC do not assume any space for arrays and insist on the 
DIM statement. 

(ii) Versions of BASIC that do assume array space might set aside 11 spaces 
(for subscripts 0 to 10) or they might set aside only 10 (for subscripts 1 to 10). 
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(iii) Versions of BASIC that set aside array space might not have the OPTION 
statement. 


The safest thing is to assume the minimum is 1, and always give a DIM statement, which 
has to be done anyway if the largest subscript is greater than 10. All versions of BASIC 
use the DIM statement to specify the largest subscript to be used with particular arrays. 

The DIM statement specifies the size of lists: 

line number DIM name(size), name(size), . . . 


The size specifies the largest subscript that will ever be used by the program for the list 
variable name. The DIM statement can appear anywhere in the program before the lists 
it names are first used. Like the REM or DEF FN statements, a running program takes 
no action when it is reached. It is simply for the information of BASIC. Most 
programmers put it at the beginning for clarity. A particular variable name should 
appear in only one DIM statement. 

Examples 

5 DIM N(4),L(4),A(4) 

specifies that the largest subscript for the lists A, L, and N is 4. This statement could 
have appeared in the previous example and would save space. 

63 DIM X7(200) 

reserves 200 spaces for a list called XI. 

Example An array can be used to count the number of times each outcome arises when 
throwing dice many times. Each member of the array is a counter, and happily its 
subscript is also the outcome that it is used to count. The result is an ‘histogram’. 

10 REM A HISTOGRAM OF DICE THROWING 
20 DIM H(12) 

30 DEF FNT=INT(RND*6#1')+INT(RND*6+1 ) 

40 REM INITIALISE THE COUNTERS 
50 FOR Ifetf TO 12 
60 LET H( I) = 0 
70 NEXT I 

80 PRINT "HOW MANY THROWS SHALL I DO .. 

90 INPUT N 

100 REM THROW N TIMES, COUNTING ALL OCCURRENCES 
110 FOR T=1 T0 N 
120 LET D = FNT 

130 LET H(D)=H(D) + 1 150 REM SHOW THE RESULT 

140 NEXT T 160 PRINT 

170 FOR 1 = 2 TO 12 
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180 PRINT ’’RESULT ’’; I ; ” OCCURRED ~;H(I) TIMES” 

190 NEXT I 
200 END 

Exercise Using the same program, print the histogram as a bar graph. You can make a 
different outcome occur each time if you RANDOMIZE anywhere before line 110. 


4 Shuffling lists 

In calculations using simple variable names, the idea of replacing one variable by a new 
value after calculation has occurred frequently, for example in the recurrence relationship 
of a series evaluation. The same concept also applies to list calculations, except that the 
replacements are often done in some ordered way within the list. As an illustration the 
same prisoners could be required to rotate their cells, so that each moves down one cell 
number, except the prisoner in cell 1, who moves to cell 4. 

In a computer program only one value can be moved at a time; in the prison analogy this 
would correspond to having only one guard to move the prisoners. The sequence of 
operations would be: 

The prisoner in cell 1 moves out temporarily. 

The old prisoner in cell 2 becomes the new prisoner in cell 1. 

The old prisoner in cell 3 becomes the new prisoner in cell 2. 

The old prisoner in cell 4 becomes the new prisoner in cell 3. 

and finally 

The old prisoner in cell 1 becomes the new prisoner in cell 4. 

The effect of this reshuffling is; Before After 

Cell Prisoner Cell Prisoner 

1 631 1 127 

2 127 2 458 

3 458 3 390 

4 390 4 631 

If there are other arrays associated with the original order, then these should also be 
shuffled. The prisoners moving into cells 1 and 3 would not be happy if they inherited the 
previous inmate’s sentence. 

A program segment which moves the prisoners and keeps track of their sentence could 
be: 


60 
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30 REM STORE PRISONER FROM CELL 1 TEMPORARILY 
40 LET XI =N(1 ) 

50 LET X2 = L( 1 ) 

60 REM MOVE THE OTHERS DOWN ONE CELL 
70 FOR 1=1 TO 3 

80 LET N(I) =N( I + i ) 110 REM PUT TEMPORARY PRISONER 

90 LET L(1)=L(I+1) 120 LET N(4)=X1 

100 NEXT I 130 LET L(4)=X2 


IN CELL 4 


A very common and embarrassing program error arises if the shuffle is done in the 
wrong sequence. The prisoners have been moved down in ascending cell order. If they had 
moved down in descending order, then the old prisoner in cell 4 would be in cells 1, 2, and 
3, and it would be some time before the other two were missed. Thus the shuffle can be 
performed downwards in ascending order, in which case the first convict goes into 
temporary storage. Alternatively they can be moved upwards in descending order in 
which case the temporary storage is used for the last convict. 


5 Problems 

Problem 10.1 Using the data for prisoner numbers, sentences and ages, write a program 
to find: 

(i) the cell number of the prisoner with the shortest unexpired sentence; 

(ii) the prisoner number of the oldest prisoner; 

(iii) the sentence of the prisoner whose age is closest to the mean. 

Problem 10.2 In the same jail the policy is to release a prisoner for good behaviour 
when he has either served half his sentence rounded up to the nearest year or has reached 
the age of 70. Write a program to determine how many years each will serve assuming 
good behaviour. 

Problem 10.3 The conversion of numbers from base 10 to another base can now be 
organised properly using a list to hold the digits of the result. As before, the digits are 
found in reverse order by the remainders after successive division. Now they can be saved 
in the correct order by placing them backwards in the list. Alternatively the list of results 
could be printed in reverse order. Before writing the program, work out how long a list is 
needed, assuming that the largest decimal number is 10000 and that the smallest base is 
2 . 


Example Find 131 to base 7. 

Successive division by 7: 131/7 « 18 remainder 5 

18/7 Pf®|2 remainder 4 

2/7 : " ! #= 0 remainder 2 


Answer: 245 


UNIT II 
Character strings 


1 Introduction 

This Unit describes how BASIC can manipulate strings of alphabetic characters. 
Character string constants have been used as messages in PRINT statements in this text. 
Now it will be seen that these can be put to several further uses. The string variable 
facility allows messages to be used in several other statements of BASIC. Some of the 
more restricted forms of BASIC will allow only a few of the operations described here, 
and by contrast a few extended versions of BASIC offer a range of string manipulation 
functions which are not described here. However if the BASIC is standard, it should 
conform to this description. 


2 Messages as constants or variables 

A string constant is any series of acceptable symbols enclosed by quotation marks, and 
can include letters, numeric digits, blanks, and a number of other characters. The only 
BASIC symbol not permitted is the quotation mark itself, because it is used to delimit the 
constant. In the BASIC statement 

77 PRINT "THIS IS A STRING CONSTANT" 

the message ‘THIS IS A STRING CONSTANT’ is a string constant. 

A string variable is given one of 26 special names which are reserved for this use. These 
consist of a letter and the dollar sign $. Therefore the names available are 

AS, BS,. . ., Z$ 

String variables can be subscripted. Therefore the statement 
10 DIM A$(75) 

defines a string list or array with 75 entries. 


3 Using character strings in BASIC statements 

Meaningful operations on character strings can be performed by many of the statements 
of BASIC. The use of string constants in the PRINT statement is familiar, and other uses 
are outlined here. 
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(a) LET 

The LET statement may contain a string variable on the left hand side, and a string 
variable or constant on the right hand side. However, string expressions cannot replace 
ordinary variables and numeric expressions cannot replace string variables. Thus the use 
of LET with strings in the minimum standard BASIC is restricted to 

line number LET string = string variable 
variable or constant 

Note, however, that subscripted forms are allowed. 

Example 

10 LET A$ = B$ 

20 LET €$ "MUD IN YOUR EYE" 

30 LET D$ = E$(I + 3*J) 

40 LET F$ ( L) = "YOUR GRANDMOTHER WEARS ARMY BOOTS” 

(b) PRINT 

The PRINT statement can include either string constants or string variables. The 
comma and semicolon used as delimiters have the usual meaning. 

Example 

10 LET M$="DISGUSTING" 

20 PRINT "TODAY’S MESSAGE IS ";M$ 

(c) INPUT 

The INPUT statement can include string variables. The message typed in response to the 
INPUT request does not need quotation marks as long as it contains only letters, digits, 
spaces, and the symbols minus, period (decimal point), and plus. The string has to have 
quotation marks if it includes other symbols such as the comma, which it would otherwise 
confuse with the commas separating input values. 

Exercise Experiment with 

10 INPUT A$,B$ 

20 PRINT A$,B$ 

30 END 

paying particular attention to the rules about quotation marks outlined above. 

Note that when asking for character input, the command which interrupts the 
computer (such as STOP or BREAK) may not work. The program 


10 INPUT A$ 
20 PRINT A$ 
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30 GO TO 10 
40 END 

could present difficulties. If asking for string input in an endless loop it would be wise to 
check for the stop message, as 

15 IF A$ = "STOP" THEN 40 

Sec the IF . . . THEN statement which follows. 

(d) IF... THEN 

A very useful application of string variables is in the IF . . . THEN statement. Two 
strings can be compared as 

line number IF string relational string THEN line number 
operator 

Standard BASIC only allows the relational operators = or <> with strings, the tests 
for equality or otherwise. However, many versions of BASIC will also permit other 
comparisons which are useful for putting things into alphabetical order, < for example. 
If this is allowed, the statement 

250 IF "ABC" <B$ (I) THEN 300 

will compare the string constant ‘ABC’ with the list entry B$(I). If ‘ABC’ is earlier in 
alphabetical order than B$(I) the jump occurs to line 300. Usually a string comparison is 
done on the basis of alphabetical order: it is not necessary for the strings to be of the same 
length, as the following examples show. 

’’ABC" is greater than "ABB" 

or ”AB" 

’’ABC” is equal to "ABC" 

’’ABC” is less than ’’ABD” 

or | ABC A” 

or *ABC ” (Note the blank.) 

Comparison between strings and arithmetic expressions is not permitted. 

(e) DIM 

String variables may be used with subscripts and so can form lists. As with ordinary 
variables, the use must be consistent. If not given explicitly, the maximum size is taken 
as 10. It will be seen later that arrays can have one, two, or three subscripts and strings 
are not an exception. 
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(f) DATA and READ 

These statements are introduced in the next Unit and, as will be seen, they can be used 
with strings. 

Example Here is a program which finds all the 24 anagrams of the word DAVE. To do 
it, you start with D as the first letter and find all the anagrams of AVE. Then you rotate 
DAVE into AVED, and so on. Can you follow all the switching? 


100 REM ALL THE ANAGRAMS OF DAVE 
110 LET D$ = "D" 


120 LET A$ = "A" 

130 LET V$ = "V" 

140 LET E$=Ppf" 

150 FOR 1 = 1 TO 4 

160 FOR J = 1 TO 3 

170 PRINT D$;A$;V$;E$ 

180 REM SWITCH V$ WITH E$ 

190 LIT T$ = E$ 

200 LET E$ = V$ 

210 LET V$ = T$ 

220 PRINT D$;A$;V$;E$ 


230 REM SWITCH 

240 LET V$=A$ 

250 LET A$ = T$ 

260 NEXT J 
270 REM ROTATE - 

280 LET A$=V$ 

290 LET V$ = E$ 

300 LET E$-D$ 

310 LET D$=T$ 

320 NEXT T 
330 END 


A$ WITH V$ 

T$ ALREADY HOLDS 


A$ 


Exercise How would you do a five letter word? 


4 Problems 

Problem 11.1 Write a program which translates integer numbers into their English 
digits. (Remainders again -use a string array for the words.) 

Example: 123 is ONE TWO THREg 

Problem 11.2 Write a program which sorts a list into alphabetical order. This requires 
IF statements to test for alphabetical ordering which most implementations of BASIC 
support, but not all. 

Problem 11.3 Write a program to assist an author in preparing an index. He goes 
through his book at the keyboard, typing in the headings and page numbers as they are 
encountered. When he is finished, he types in ‘FINISHED’, assuming this message will 
not occur in the index. The program then sorts his lists according to the alphabetical 
order of the headings. The same heading may occur several times. The index is then 
printed with one entry for each heading. If there are repeated entries for a heading, the 
page numbers appear in order on one line of the output. The author will, of course, 
further edit this index. 


UNIT 12 

Defining values in advance 


1 Introduction 

Several times in earlier units it was necessary to give a program data values that were 
known in advance by the laborious method of typing them in whenever the program was 
run, or through a long series of LET statements. The assignment of sentences and ages to 
the prisoners in Unit 10 was one example, and in the problems with strings the same 
difficulty will have arisen. This unit describes the convenient way of setting up data 
constants in a program once and for all. 


2 Assigning values—the DATA, READ, and RESTORE statements 

BASIC allows a list of constants to be set aside in the computer in the DATA statement, 
and these values can be assigned to any variable using the READ statement. This facility 
eliminates the need to enter known constants every time a program is run. 

The DATA statement has the form: 

line number DATA constant , constant , . . . 

The DATA statement itself has no effect in a running BASIC program. In this it 
resembles several other statements encountered earlier, including the DIM statement. It 
is a statement for the information of BASIC, and it causes the constants, to be stored in 
the computer, where they can be retrieved by a READ statement when the program is 
run. Any number of DATA statements can be included in a program and they can be put 
anywhere. If there are several, their order is important, however. The constants can be 
numbers in any of the usual BASIC forms, or they can be string constants as will be seen 
later. 

An example of a DATA statement is 
10 DATA 38.2,10.5,-9.6 

The READ statement is used to assign values from the DATA statement to the desired 
variables. It is written as 


line number READ variable , variable , . . . 
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This statement is acted upon by a running program. Values are assigned to the named 
variables from the DATA statements in order and in one-to-one correspondence with the 
requirements of the READ statement. For example, consider the program 

10 DATA 38.2,10.5,-9.6 
20 READ A,B,C 
30 PRINT A,B,C 
40 END 

In this program, A will be assigned the value 38.2, B the value 10.5, and C will be —9.6. 

Successive READ statements in the running program carry on through the DATA list. 
Therefore if only part of a DATA statement is used by a given READ, then the next 
READ starts with the next value. In effect a pointer moves through the DATA constants 
as values are requested by READ statements. 

Consider the program 

10 DATA 38.2,10.5,-9.6 
20 FOR 1=1 TO 3 
30 READ Z 
40 PRINT Z 
50 NEXT I 
60 END 

Here, the DATA pointer is initially at the beginning of the list: 
next value 

38.2 10.5 -9.6 

When I = 1, the statement READ Z assigns 38.2 to Z and moves the pointer along: 
next value 

38.2 10.5 -9.6 

so that when I = 2, 10.5 is assigned to Z and the pointer moves again; 
next value 

38.2 10.5 -9.6 

and the final request assigns Z to be —9.6. 

Similarly, if more variables are requested by one READ statement than are given by one 
DATA statement, the next DATA statement according to line number is taken. Thus the 
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order of DATA statements is important because the DATA area is made up from the 
DATA statements taken in order. It is wrong to ask for more constants than are present 
in all the DATA statements. 


Example 

10 DATA 38.2 
20 FOR 1 = 1 TO 3 
30 DATA 10.5 
40 READ Z 
50 DATA -9.6 


60 PRINT Z 
70 DATA 4E31 
80 NEXT I 
90 DATA 75 
100 END 


This example indicates how the DATA statements can be broken up, but is also an 
example of how to make a program hard to read. This is not good style. 

The RESTORE statement returns the pointer to the beginning of the DATA area, so 
that all the given data can be re-used. In most versions of BASIC, there is no direct 
means of returning to the middle of the DATA list, but it is possible to return to the 
beginning with RESTORE and read through to the desired place, for example in a FOR 
... NEXT loop. 

RESTORE has the form: 


line number RESTORE 
Exercise Try the following program: 


60 NEXT I 
70 RESTORE 
80 NEXT J 
90 END 


10 DATA 1,2,3 
20 FOR J=1 TO 2 
30 FOR 1 = 1 TO 3 
40 READ X 
50 PRINT X; 


The behaviour of the pointer in this program is then: 
First: 

J =§ 1. 12 3 

I = 1 

.1=1 12 3 

I = 2 


J = 1 
I = 3 
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RESTORE 

J = 2 I 2 3 

l >*I. 

J = 2 12 3 

I = 2 

.y'm-% i 2 3 

i =*t 

RESTORE 

$ 

1 2 3 


3 Assigning values to an array 

Values are assigned to an array variable in much the same way as to any other, except 
that subscripts have to be used. To fill an array from the DATA area, FOR . . . NEXT 
loops must therefore be used. 


Examples 

10 DATA 38.2,10.5,-9.6 
20 FOR 1 = 1 TO 3 
30 READ X(I) 

40 NEXT I 

50 PRINT X(1),X(2),X(3) 
60 END 


10 DATA 38.2 
20 FOR 1 = 1 TO 3 
30 DATA 10.5 
40 READ X(l) 

50 DATA -9.6 
60 NEXT I 

70 PRINT X(1),X(2),X(3) 
80 END 


As before, the second example illustrates the point but is poor style. 


4 Assigning values to string variables 

String constants can be included in DATA statements, for example 
10 DATA 100,STRING,200,CONSTANT 

stores the string constants ‘STRING’ and ‘CONSTANT’ in the DATA area alongside 
the numeric values. There are no quotation marks in this example. However quotation 
marks have to be used sometimes. There is a great variation among computers on this 
point. The standard for BASIC suggests an arrangement which is unfortunately not 
followed. To make a program transportable, the safest thing would be always to use 
quotes, particularly if the string contains anything other than letters. 
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Examples 

10 DATA STRING,CONSTANT 

defines two string constants ‘STRING' and ‘CONSTANT’ without quotation marks. 
Usually this would be safe. 

10 DATA "STRING,CONSTANT" 

defines one string constant, ‘STRING,CONSTANT’ which includes a comma. 

10 DATA “-FIVE"," GO","... AND THEN", "123 ZOOM" 

defines a number of string constants which probably require the quotation marks. 

The BASIC standard does not provide for quotation marks themselves to appear in 
strings. However, most versions of BASIC in the real world would accept that two quotes 
together indicate a quote, for example 

to get ” put 

so that a PRINT statement might have 

50 PRINT ” TO GET PUT . 

The READ statement can obviously include string variable names which must correspond 
in position with string constants in the DATA list. 

Example 

10 DATA 100,"STRING ”, 200,CONSTANT 
20 READ X , A$ , Y , B$ 

30 PRINT A$;B$ 

40 END 

Example Using a string array to hold the result, a decimal number can readily be 
converted into the hexadecimal number system (base 16) in which the digits from 0 to 15 
are represented as 0 to 9 followed by A to F. This is a very useful number system in 
computers. In the program, the symbols for the hexadecimal digits are copied into the 
array H$. Then, the remainder after dividing by 16 is found, which tells us where to find 
the digit in H$. It is written to use OPTION BASE 1 which is always safe. 

100 REM DECIMAL TO HEXADECIMAL 
110 DIM H$(16),A$(4) 

120 DATA ”0”,”1",”2",”3”,”4","S”,”6","7" 

130 DATA "8","9","A","B“,“C ’,"D",“E",”F” 

140 REM READ THE HEX DIGITS INTO H$ 

150 FOR K-l TO 16 
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160 READ H$(K) 

170 NEXT K 

180 PRINT "ENTER A DECIMAL NUMBER FROM 0 TO 65535” 

190 INPUT N 

200 REM CONVERT IT 

210 FOR K= 1 TO 4 

220 LET D = N-INT(N/16)*16 

230 LET N = INT(N/16) 

240 LET A$(K)=H$(D+1) 

250 NEXT K 

260 REM PRINT THE RESULT 

270 PRINT "IN HEXADECIMAL THAT IS "; 

280 FOR K=1 TO 4 

290 PRINT A$(5-K); 310 PRINT 

300 NEXT K 320 END 


5 Problems 

Problem 12.1 Looking up an entry in a table is a very common requirement, especially 
in the commercial world. Establish a list of numbers by a DATA statement and make a 
program to search the list for a particular entry that may or may not appear. 

Problem 12.2 Write a program to translate an integer into English digits. This time the 
digits can be stored in a DATA area. For example, 123 is ONE TWO THREE. 

Problem 12.3 A company payroll is defined in DATA statements. The first one tells 
how many employees there are. There is then one further statement for each employee 
defining among other things their name and salary. Write a program to read the list, 
which is in no particular order, and print two summaries, one in alphabetical order and 
the other in reverse order of earnings. If you feel ambitious, tax them heavily for all kinds 
of things and print their miserably small monthly cheques. 

Problem 12.4 The solution to Problem 12.1 will have involved searching the list entirely 
each time. A 'binary search’ is much more efficient. Suppose there is a prison with 16 
inmates in it. Define their cell numbers, ages and sentences in order of prisoner number. 
Write a program which enables the Warden to type in a prisoner number and retrieve the 
information about the prisoner and his probable real sentence for good behaviour as 
defined in Problem 10.2. Do this by a ‘binary search'. First the prisoner number is 
compared with the number 8 in the list to find which half it is in (or it might by luck be 
the eighth). Then it is compared with number 4 or 12 to find which quarter it is in, and 
so on. For example if prisoner number 53 was the third in the list, the program would 
decide on first half, first quarter, second eighth and finally find him. In a 16 person 
prison it can never take more than 4 tries to locate a prisoner. 


UNIT 13 
Subroutines 


1 Introduction 

Properly used, the subroutine is another facility which can improve the structure of a 
program. With the function definition statement described in Unit 9, a one line 
calculation could be expressed as a function and then referred to throughout a program. 
With subroutines, a computation of any length and complexity can be written as a 
separate unit and then used at will in a program. 


2 Defining subroutines—the GOSUB and RETURN statements 

A subroutine is a separate program module not restricted to one line. It is written as a 
self-contained unit, starting at some line number which does not occur elsewhere, and 
containing its own line numbers in order. The program calls for the subroutine explicitly 
in a GOSUB statement, and to get back from the subroutine the RETURN statement is 
necessary. 

Example A subroutine is required to evaluate the factorial of a number. Suppose N9 is 
a positive integer or zero, and its factorial is required. The factorial of N9 is the product 
of all the integers from 1 to N9 and the factorial of zero is 1. A subroutine is written 
starting at line 2000 to work out this product in a FOR . . . NEXT loop: 

2000 REM SUBROUTINE TO FIND FACTORIAL OF N9 

2010 REM ANSWER IN N8, 19 IS USED 

2020 LET N8 = 1 

2030 IF N9<2 THEN 2070 

2040 FOR I9 = N9 TO 2 STEP -1 

2050 LET N8 = N8*19 

2060 NEXT 19 

2070 RETURN 

2080 END 

This subroutine always finds the factorial of N9 and returns the answer as N8. It will 
work for any positive or zero N9. For negative N9 the answer 1 is returned. Variable 19 is 
used in the calculation. To use this subroutine as part of a BASIC program care must be 
taken that 19, N8, and N9 are not used in a conflicting way because the same variables 
are shared by all parts of the program. 

A program to make use of this subroutine could be: 
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10 REM THIS IS A PROGRAM TO FIND THE FACTORIALS 
20 REM OF NUMBERS TYPED IN AT THE KEYBOARD 
30 REM 

40 REM REQUEST INPUT 

50 PRINT "NUMBER WHOSE FACTORIAL IS REQUIRED"; 

60 INPUT N9 
70 GOSUB 2000 

80 PRINT "FACTORIAL ”;N9;" IS ” ; N8 
90 GO TO 50 

When these are used together, the subroutine is called at line 70 by the GOSUB 
statement. On its completion at line 2060, the subroutine comes back with the RETURN 
statement. 

The power of the subroutine lies in its ability to return to the place from which it was 
called. It could be called from a program several times, or from another subroutine, or 
both. However, a subroutine should not call itself, and an endless loop of subroutines 
should not be established. 

Exercise Run this program. Notice the semicolon in line 50. 

The statements provided for subroutine usage are: 

line number a GOSUB line number b 
This statement causes a jump to a subroutine at line number b. 
line number b RETURN 

This statement sends the program back to the line following the GOSUB which called it. 


3 Terminating programs—the STOP statement 

Before subroutines were introduced, the END statement was sufficient both to end and 
terminate the program. The END statement is still required to be the highest numbered 
line in a BASIC program, subroutines and all. Therefore a program must always end with 
one and only one END statement. The STOP statement is available to stop or terminate 
the running of a program and can be put anywhere in the program. It is simply 

line number STOP 

and when it is encountered, execution of the program stops. Thus in the example of 
section 2, line 90 could have been a STOP statement. 

Example This little subroutine arranges an array R of numbers into order from 
smallest to largest. The method used is called bubble sorting. On each pass through the 
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array, larger values are carried along, like bubbles rising to the top. This can be put into 
any program to sort numbers as long as you remember that the subroutine obliterates 


1000 REM BUBBLE SORTING ROUTINE 

1010 REM SORTS R9 MEMBERS OF ARRAY R 

1020 REM USES VARIABLES R6, R7, R8 

1030 LET R8=R9 

1040 LET R6 = 1 

1050 FOR R7 1 '1 TO R8~l 

1060 IF R(R7)<R(R7 + 1 ) THEN 1120 

1070 REM SWITCH TWO NUMBERS 


the table 

R. 



1080 


LET 

R6 = R(R7) 

1090 


LET 

R(R7) =R(R7 + 1) 

1100 


LET 

R(R7+1)=R6 

1110 


LET 

R6 = R7 

1120 

NEXT R7 


1130 LET R8=R6 
1140 IF R8<> 1 
1150 RETURN 


4 An example 

A program to find the area under a curve is the kind of requirement which is suitable for 
organisation as a subroutine. The algorithm is easily separated in any program which will 
use it, and it is likely that a good one would be useful to many people. 

The trapezoidal rule which was illustrated in Fig. 7.2 is a simple method for finding the 
area under a curve. The area of the shaded trapezoid was 

area = [/(.v,) + J{x 2 ) } (x, - x,) 

2 

If a larger number of trapezoids are taken, then the area is obtained by summation. In 
Fig. 13.1 a curve has been divided into N9 trapezoids between X8 and X9, and here 

area = H9 * [f(X8) + f(X9)] + f(X8 + H9) + f(X8 + 2*H9) 

2 

+ . . . + f(X8 + (N9-l)*H9) 





ie trapezoidal rule with mar 
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where 

119 X9 - XS 
N9 

A BASIC subroutine which finds the area under a curve which is defined by FNZ(X) 
between the limits X8 and X9 using N9 strips is given below. To use this, it is necessary 
to define the function FNZ and call the subroutine with the desired values of X8, X9 and 
N9 already assigned. The subroutine makes use of the variable S9 for summation, 19 for 
counting, and H9 for strip width. The subroutine assumes correct values of X8, X9, and 
N9. It will work for any integer N9 greater than 0. 

6000 REM AREA UNDER A CURVE FNZ BY TRAPEZOID RULE 
6010 REM FROM X8 TO X9 IN N9 STRIPS 
6020 REM VARIABLES S9, 19 AND H9 ARE USED 
6030 REM 

6040 REM CALCULATE STRIP WIDTH 6080 REM DO REMAINING SUM 

6050 LET H9=(X9 X8)/N9 6090 FOR I9 = N9-1 TO 1 STEP -1 

6060 REM END VALUES OF SUM 6100 LET S9 = S9 + FNZ( X8+ 19*H9 ) 

6070 LET S9 = 0.5*(FNZ(X8) + FNZ(X9)) 6110 NEXT 19 

6120 REM MULTIPLY BY H9 AND RETURN 
6130 LET S9 = S9*H9 
6140 RETURN 


Exercise Write a program to use this subroutine which accepts X8, X9, and N9 in an 
INPUT statement and find the area under 

J_ exp(—x : /2) 

\/2tt 

between 0 and x — \. How many strips are required to give an answer which is 
correct to 4 decimal places? 

Exercise Improve the safety of the subroutine by making it check for a sensible value 
of N9 and ensuring that X9 > X8. 


5 Problems 

Problem 13.1 Write a subroutine to make a single line of a bar graph by shading from 
columns C8 to C9 or C9 to C8, depending on which is greater. Write another subroutine 
which draws a bar graph of a function FNX between X8 and X9 in steps using scale 
factor K9 and offset 09. This subroutine should call on the first one to do the actual 
drawing. Using these draw a shaded graph of a cosine. 
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Problem 13.2 Write a subroutine which scans the first L9 entries in a list Q9, and finds 
the largest value M9 and its position N9. 

Problem 13.3 Write a subroutine which sorts a string list AS of length L9 into 
alphabetical order. 

Problem 13.4 Write a subroutine to solve the equation 
FNY(X) = 0 

by Newton's method given an initial guess X9. The subroutine should return the answer 
R9 when the latest step size is less than E9. Use this to find the square root of 2. 

Problem 13.5 Another method of area calculation is known as Simpson's rule. Fig. 
13.2. Here two adjoining segments are fitted by a parabolic curve and the shaded area a 
is 


# = h [ /( v ) • 4 /{.y ) - /(a.)| 

3 

Write a subroutine to divide the range from X8 to X9 of a function FNZ into 2*N9 
strips and find the area by Simpson’s rule. Using this calculate the area under 

,/t v) : = 1 e.\p( v /2) 

between .v = 0 and .x^Sl. Find out how many strips are required for 4 decimal places of 
accuracy. How does the number required compare with the trapezoidal rule? 









UNIT 14 

Working with tables 


1 Introduction 

The concept of a list, which is an array with one subscript, was introduced in Unit 10. 
Once the basic idea of using subscripts has been mastered, it is possible to move on to 
arrays with two subscripts. These are of great importance in computation. Programmers 
sometimes find that dealing with two subscripts does not come easily, so a careful 
approach to this Unit is advisable. 


2 Tables and subscripts 

All versions of BASIC will allow arrays to have one or two subscripts. Many versions 
also permit three or more. It has already been seen that with one subscript a list is 
formed, such as 

A( 1) 

AC) 

A(3) 

The extension to two subscripts is straightforward enough. A variable with two 
subscripts forms a table, such as 

C(l,l) C( 1,2) C(l,3) 

C( 2,1) C( 2,2) C(2,3) 

C( 3,1) 1(3,2) C( 3,3) 

The BASIC representation includes both subscripts, separated by a comma. The order of 
the subscripts should be noted; the first gives a row number and the second is the column 
number. 

Row number 

C(I,J) 

Column number 

In a similar way it is possible to use more subscripts, if a particular implementation of 
BASIC permits it. 
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Any variable which is used with subscripts is automatically recognised by BASIC to be 
an array. Now that both lists and tables are available it is necessary to be consistent in a 
program about the number of subscripts used with variable names. Once a list, 
always a list. Once a table, always a table. If no DIM statement is given, the largest 
possible subscript is taken to be 10. The form of the DIM statement should be generalised 
slightly: 



/ integer 


integer . 

line number DIM variable 

\ commas I 
X between ' 

, variable 

( sizes \ 

\ commas f 
' between 1 


The variable can be a string constant or an ordinary variable. 


Example 

30 DIM Q$(23),Z(25,40) 

defines a string list Q$ with up to 23 entries and an ordinary table Z with 25 rows and 40 
columns. 


As with arrays of one dimension, the smallest subscript might be 0 or it might be 1. To 
make a program work on every BASIC, assume that it is 1. 

Example This subroutine will search a table with two subscripts for the largest value. 
The table is called T, and its first subscript is searched from 1 to Tl, its second from 1 to 
T2. It returns to you with T3 and T4 telling you where the largest value is, and T5 is the 
value in question. T6 and T7 are used in the search. 


2000 REM 
2010 REM 
2020 REM 
2030 REM 
2040 REM 
2050 LET 
2060 LET 
2070 LET 
2080 REM 


SUBROUTINE WHICH SEARCHES FROM T(l,l) 
TO T(T1,T2) FOR THE LARGEST VALUE 
T(T3,T4) WHICH IS RETURNED IN T5 
T6 AND T7 ARE USED FOR SEARCHING 
INITIALISE - T( 1 ,1) MIGHT BE IT 
T5=T( 1,1) 


T3= 1 


2090 FOR T6 =1 TO Tl 

2100 FOR T7=l TO T2 

2110 IF T(T6,T7)<=T5 THEN 216 

2120 REM HERE IS A BIGGER ONE 

2130 LET T5 = T(T6,T7) 

2140 LET T3 = T6 

2150 LET T4 = T7 

2160 NEXT T7 
2170 NEXT T6 
2180 RETURN 
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3 Calculating with tables 

Lists and tables are dealt with in much the same way, but in working with tables the 
demands on the thought processes can be more severe in keeping track of the rows and 
columns. 


Suppose a company has four products and four branch offices. A record of sales figures 
for a particular quarter is kept in table form: 


Containers pic 


Branch 


London Manchester Liverpool 


Birmingham 


Bottles 

Product Bags 
Boxes 
Bibelots 


43 96 

600 143 

215 400 

307 351 


53 331 

270 201 

311 192 

492 331 


In a BASIC program DATA statements could be used to store the names of the cities 
and the products and also to save the table of values: 

10 DATA 43,96,51,331 
20 DATA 600,143,270,201 
30 DATA 215,400,311,192 
40 DATA 307,351,492,331 

50 DATA "LONDON" , "MANCHESTER" , "LIVERPOOL" , "BIRMINGHAM" 

60 DATA "BOTTLES", "BAGS', "BOXES", "BIBELOTS" 

For convenience each row is written in one DATA statement, although there is nothing 
wrong with compressing the information into fewer statements. The data can be read into 
the table T in the following way: 

100 FOR 1=1 TO 4 130 NEXT J 

110 FOR J=1 TO 4 140 NEXT 1 

120 READ T(I,J) 

Note carefully that the data has been read across the row by making the column number 
J increase most rapidly. I and J are popular variables to use as row and column numbers. 

It is known from earlier work how string lists can be set up: 

170 FOR K= l TO 4 
180 READ A$(K) 

190 NEXT K 
200 FOR K= 1 TO 4 


210 READ B$(K) 
220 NEXT K 
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After this has been done, A$ has the city names corresponding to the columns. B$ on the 
other hand is different from the others because it is organised to coincide with the rows 
and this will be important later. 

Now that the table has been set up it can be calculated in various ways. First of all the 
rows are inspected to see how each commodity fares in the various cities. For each 
product the total sales and the best city are found: 

300 FOR 1=1 TO 4 
310 LET S = 0 
320 LET M= 0 
330 FOR J=1 TO 4 
340 LET S = S+T(I,J| 

350 IF T( I , J ) <M THEN 380 
360 LET M = T (I , J ) 

370 LET M$ = A$(J) 

380 NEXT J 

390 PRINT "WE HAVE SOLD ";S;B$(I) 

400 PRINT "WE DID BEST IN ";M$;" WHERE WE SOLD ”;M;B$(I) 

410 NEXT I 

Exercise Put this program together and run it. Improve the presentation. 


4 Problems 

Problem 14.1 All the products of Containers pic are sold in cases of value $1, and the 
data given are in cases. Process the columns to find out the total value of sales for each 
city and which product earned the most in that city. 

Problem 14.2 Shuffle the table of Containers pic by program so that the cities and 
products are ir alphabetical order. Print the table, with headings, in this form. 

Problem 14.3 Shuffle the table by program so that the cities are in order of greatest 
total sales there and the products are also in order of greatest total sales in all cities. Print 
the table, with headings, in this form. 

Problem 14.4 Write a story writing program using a table in which column 1 is an 
adjective, column 2 is a noun, column 3 a verb, column 4 an adverb, column 5 another 
adjective and column 6 a noun. Ask 6 friends each to type in 10 words to fill one column 
without consulting the others. Print the story. Then shuffle each column into alphabetical 
order and print this as Chapter 2. Some people have used computers to write music in a 
similar fashion it too is sometimes pretty funny. 


APPENDIX 

A summary of basic BASIC 


This summary describes a universal subset of BASIC which conforms to the ANSI 
X3.60-1978 and ECMA-55 1978 standards for minimal BASIC which are compatible 
with each other. Many systems will support facilities not described here, including 
additional commands, additional functions, and file manipulation statements. 


1 BASIC programs 

A program in BASIC consists of numbered statements, or lines, of the form 

line number statement 

Example 

10 PRINT 5/7 
20 ENI) 

When a BASIC program is executed, using the command RUN, the statements are 
obeyed in order of their line numbers unless the program itself dictates otherwise. The 
last line of every BASIC program must be an END statement. 


2 Commands 

Although commands are not covered by the standards, every BASIC system should 
support at least the following three commands, or some equivalent: 

(i) RUN- -the current BASIC program is executed 

(ii) LIST the current BASIC program is printed at the terminal or screen 

(iii) NEW —thecurrent BASIC program is lost so that a new one may be commenced. 


3 Creating BASIC programs 

Although the interactive interface to BASIC is not covered by the standards, editing by 
line numbers is universally used. All keyboard entries to an interactive BASIC system, 
except when a program is running, will be interpreted as statements if a line begins with a 
number. Otherwise they will be interpreted as commands. 
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(a) Entering Programs are entered by typing each line with a line number and ending 
with the ‘RETURN’ key. (Unit 1) 

(b) Correcting A line is replaced by typing the replacement in full, including the line 
number and the ‘RETURN' key. (Unit 1) 

(c) Correcting lines while typing There will be a symbol which eliminates the character 
before it. This might be backspace, delete, back arrow, or even CTRL and H. (Unit 1) 

(d) Inserting A new line is inserted between two others by the use of a suitable line 
number. (Unit 1) 

(e) Deleting A line is deleted by typing the line number and ‘RETURN’. (Unit 1) 


4 Numbers in BASIC 

Numbers in BASIC can be expressed in three forms: 

(a) Integer—a number written without a decimal point, e.g. 123. 

(b) A number written with a decimal point, e.g. 3.1416. 

(c) Exponential—a number written with an exponential indicated by the letter E, e.g. 
1E10 means 1 x 10 w . (Unit 3) 


5 Variables in BASIC 

(a) Ordinary variables which represent numeric values in BASIC can be assigned any of 
286 names which are the single letters: 

A, B, C, . . . Z 

or any letter plus a single digit: 

AO, Al, . . . A9 
BO, Bl,. . . B9 
ZO, ZL...Z9 (Unit 3) 

(b) String variables are identified by the 26 names: 

AS, B$, ...Z$ (Unit 11) 

(c) Ordinary variables 

An ordinary variable is written without a subscript and it represents a single numerical 
value, e.g. X7. 


82 basic BASIC 


(d) Arrays 

A variable is an array or list if it is written with up to two subscripts, in which case it 
represents a list of values, e.g. Q$(9), N(I,J). An array must always have the same 
number of subscripts. Many versions of BASIC allow additional subscripts. (Units 10 
and 14) 

(e) Subscripts 

A subscript can be any arithmetic expression; however the resulting value must be 
between the minimum and the maximum array size. Non-integer subscripts are truncated 
to integers. (Unit 10) 

(f) Minimum subscripts 

The minimum subscript should be 0, but on some systems it is 1. If the system conforms 
to the BASIC standard the minimum can be set by the statement OPTION BASE 0 or 1. 
However many systems do not conform and will not recognise OPTION. The safest 
thing is to regard 1 as the minimum. (Unit 10) 

(g) Array sizes 

The maximum size of an array is set up by the DIM statement, or by default to 10 in 
each subscript if no DIM statement is given. This means that if the minimum subscript is 
0, arrays not set up by DIM statements have 11 possible subscripts (0 to 10). An array 
with one subscript will then have 11 members, while an array of two subscripts will have 
121 . 

If the minimum subscript is 1, there are 10 possible subscripts unless a DIM statement is 
used. Arrays of one and two subscripts will have 10 and 100 members respectively. 


6 Character string constants 

(a) String constants are sequences of symbols usually enclosed in double quotation 
marks, e.g. "HELLO SAILOR". They may be used in the PRINT statement (Unit 1). 
They are also allowed in DATA, IP . . . THEN, and on the right hand side of the LET 
statement. (Unit 11) 

(b) String variables have any of the 26 names A$, B$, . . . Z$. They may be used in the 
statements INPUT, PRINT, READ, IF . . . THEN, LET and DIM (and so may be 
subscripted). (Unit 11) 

(c) In comparing strings using the IF . . . THEN statement, the standard only supports 
tests of equality or non-equality. However most implementations treat strings nearer the 
beginning of the alphabet as less than those nearer the end. (Unit 11) 

For example 

"AB" is less than "AC" 

”AB" is less than "ABA" 


7 Arithmetic expressions 

BASIC uses the hierarchy of operators 
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( ) expressions in brackets high priority 

A exponentiation 
* / multiplication and division 
+ — addition and subtraction low priority 

The result of an expression is always as if operations of equal priority are performed 
from left to right. Arithmetic expressions may be written involving these operations and 
any variables or constants, e.g. (A+ 3)/D(I). 

A single variable or constant is itself a valid expression. 

Two operators may not appear together, e.g. A+ — B is not allowed. Operators normally 
separate two values, e.g. 3*B, but the operator — has ‘unary’ meaning, e.g. —J or 
3*( —B). (Unit 2) 


8 Relational expressions 

(a) Relational expressions are written 

arithmetic relational arithmetic 
expression operator expression 

for example 

A > B 

The result of the relational expression is TRUE or FALSE. Relational expressions are 
used in the IF . . . THEN statement. (Unit 5) 

(b) The relational operators are 

= equal to 

> greater than 

< less than 

> = greater than or equal to 

< = less than or equal to 

<> not equal to (Unit 5) 

(c) In some systems relational expressions can be more complicated, involving the 
additional operators AND and OR (inclusive) as in 


(A<B* 10) OR (C> = 1) 


84 basic BASIC 


(d) In some systems the results TRUE or FALSE have the values 1 and 0 and can be 
used as part of any arithmetic expression. 

(e) The string relational expression is available for the operations of equality or 
non-equality (<>). Usually systems will allow any comparison. 

string relational string 
operator 

for example 

"abc"Hb$( I) (Unit 11) 


9 Library functions 

All BASIC systems should support the following set of library functions: 

Function Meaning 

SIN(x) The sine of x where x is an angle in radians. 

COS(x) The cosine of x where x is in radians. 

TAN(x) The tangent of x where x is in radians. 

ATN(x) The arctangent of an angle x in the range —7r/2 to +ir/2 radians. 

EXP(x) The value of e\ 

LOG(x) The natural logarithm of x. 

ABS(x) The absolute value of x. 

SQR(x) The square root of x. 

INT(x) The largest integer not greater than x. For example, INT(5.95) = 5 and 
INT(-5.95)=-6. 

SGN(x) The sign of x; has value 1 if x is positive, 0 if x is 0, or — 1 if x is negative. 

In the above functions, x represents any expression, which may of course include other 
functions. The quantity x is called the argument or parameter of the function. (Unit 6) 

The function RND, which is a random number generator, appears in most versions of 
BASIC. It does not always have an argument if it does, the argument may not have a 
meaning. 

The TAB function is a special function associated with the PRINT statement, as 
described in Section 11 of this Appendix. 
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10 The statements of basic BASIC 

The statements of BASIC are summarised here in alphabetical order. Items in square 
brackets are optional. 

line number DATA constant, constant , . . . 

The constants given in the DATA statement are stored in the computer in the 
order given. Successive DATA statements add to the list in order. Information in 
the list is assigned to variables by the READ statement. (Unit 12) 

Strings can be defined in the DATA statement. It is recommended that the 
quotation marks should always be given because the arrangement suggested by 
the standard on this issue is not followed by most systems. 

For example 

DATA "STRING” ,”STRING + 31” (Unit 11) 

line number DEF FN a(variable) = expression 

This statement is used for function definition. See Section 12 of this Appendix. 
(Unit 9) 

line number DIM subscripted variable , subscripted variable, . . . 

The DIM statement specifies the maximum size of arrays. In the DIM statement 
the subscripts must be integer numbers. If an array is not mentioned in a DIM 
statement, the maximum is 10 in each subscript. The standard recommends that 
one or two subscripts should be allowed, but many versions of BASIC will allow 
more. (Unit 10) 

line number END 

The END statement must be the last in any BASIC program, i.e. it must be 
present and have the highest line number. When it is encountered the execution 
of a BASIC program terminates. (Unit 1) 

To terminate a program before the highest line number, the STOP statement is 
used. (Unit 13) 

line number EOR variable = expression a TO expression b [STEP expression c] 

The FOR statement begins a FOR . . . NEXT program loop, which is repeated 
with the named variable having the initial value given by expression a and 
changing by expression c until expression b is reached. The word STEP and 
expression c are optional, and if not given the step is taken as 1. The named 
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variable can be adjusted during the loop, but the initial, final, and step values are 
fixed when the loop first begins and cannot later be changed. A loop may be 
jumped over altogether if these values suggest that it should, for example in 

FOR JSj|0 TO 1 STEP 1 

A program must not jump into loops from outside. The end of a loop is indicated 
by a NEXT statement, which must be present. FOR . . . NEXT loops using 
different variables may be nested. (Unit 7) 

line number a GOSUB line number b 

This statement is used to call a subroutine. See Section 12 of this Appendix. 
(Unit 13) 

line number a GO TO line number b 

The GO TO statement causes a jump to line number b. (Unit 4) 

line number a IF relational expression THEN line number b 

When the IF statement is encountered, the relational expression is evaluated and 
if it is TRUE, then the program jumps to line number b. If the relational 
expression is FALSE, the execution continues from the next line after line 
number a. (Unit 5) 

line number INPUT variable , variable ,. . . 

The INPUT statement causes the computer to request information by displaying 
a prompting symbol, usually ?, and waiting until a line of information is entered. 

Exactly the correct number of quantities should be entered, separated by 
commas. If the wrong number of values is given, standard BASICs should 
require all of it to be entered again. In any event the message given by the 
computer should be clear. 

line number LET variable = expression 

In the LET statement the expression on the right hand side is evaluated and the 
result replaces the value of the variable on the left hand side. (Unit 3) 

line number NEXT variable 

The NEXT statement identifies the end of the FOR . . . NEXT loop in which the 
variablevias the one used in the FOR statement. (Unit 7) 
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line number a ON expression GO TO line number b , line number c, . . . 

The ON . . . GO TO statement allows a multiple choice of branches to the 
destinations given in line number b, line number c, . . . . The expression is 
evaluated and truncated to an integer. If the result is 1, the program jumps to 
line number b, if 2 to line number c\ and so on. If the expression is negative, zero, 
or too large for the number of destinations given, an error message is produced. 
(Unit 5) 

line number OPTION BASE 0 or 1 

This statement tells a system whether the minimum subscript for arrays is to be 0 
or 1. Most current versions of BASIC will not recognise this. The safest thing it 
to regard the minimum subscript as 1. (Unit 6) 

line number PRINT quantity separator quantity separator . . . 

This statement produces printed output. See Section 12 of this Appendix. 

line number RANDOMIZE 

Selects an apparently random starting place for the RND function. (Unit 10) 

line number READ variable , variable , . . . 

The READ statement assigns values to the named variable's from the list defined 
by DATA statements. As successive READ statements are encountered, they 
continue through the DATA list until they are satisfied. The variable s may be 
string variables. (Unit 12) 

line number REM any remark or comment 

The REM statement has no effect on the execution of a BASIC program, and is 
provided to allow remarks to be inserted to explain the program. (Unit 3) 

line number RESTORE 

The RESTORE statement returns subsequent READ statements to the 
beginning of the DATA list. (Unit 12) 

line number RETURN 

This statement is used in subroutines. See Section 12 of this Appendix. (Unit 1 3) 
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line number STOP 

This statement terminates the execution of a program and is used when a 
program is to stop before the last line (which is the END statement). (Unit 13) 


11 Printing 

All BASIC systems support the PRINT statement: 

line number PRINT quantity separator quantity separator . . . 
where quantity can be 

(a) an expression resulting in numerical output 

(b) a character string in quotation marks resulting in literal output 

(c) a string variable resulting in literal output 

(d) the TAB function 

and separator can be a comma or semicolon, as explained below. 

A PRINT statement starts a new line unless a final separator was explicitly given in the 
previous PRINT, in which case it continues on the same line. 

A PRINT statement containing more items than can be printed on a line will be 
continued on the following line. 

The comma The print line is divided into typically 5 zones of 1 5 spaces. The comma 
causes the next quantity to be printed beginning in the first space of the next zone. 

The semicolon between quantities causes the output to be compressed. After a TAB 
function or a character string printing continues in the next space. Between numerical 
output the spacing depends on the numbers but at least one space should be given after 
(but not before) numbers. At the end of a PRINT statement the semicolon causes the 
next PRINT statement to continue on the same line. 

Numbers may appear in the printed output as integers, or as numbers with decimal 
places, or in exponential format. 

The TAB function TAB(expre.v.?/'o/7) may appear as a quantity in a PRINT statement. 
This causes the printer to move forward to the column number given by the integer part 
of the expression. If asked to move backwards or beyond the end of a line, it will move to 
an appropriate column in the next line. 
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12 Functions and subroutines 

(a) Functions (Unit 9) 

All BASIC systems support the single line function definition: 

line number DEF FNa ( variable ) = expression 

a can be the letters A through Z; thus the 26 names FNA, FNB, . . . FNZ are available. 
The standard for BASIC does not provide for string functions, but most implementations 
do allow A$ to Z$ as additional names of string functions. 

When a function name is implicitly used in a running program, the expression on the 
right hand side is evaluated using the given value of the function variable. The function 
variable is thus a ‘dummy’ for the value used while running, and should be of the correct 
type (ordinary variable or string variable). 

Only one definition of a particular function should be used. Functions may use other 
functions, but not themselves and endless loops may not be established. 

(b) Subroutines (Unit 13) 

Subroutines are called by the GOSUB statement: 

line number a GOSUB line number b 

The running program continues from line number b until a RETURN is encountered, 
when it carries on from the line after line number a. Subroutines may call other 
subroutines but not themselves and loops may not be so established. 

Subroutines are ended by the RETURN statement: 

line number RETURN 

The running program returns to the line after the latest GOSUB. 

The STOP statement terminates program execution: 


line number STOP 
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Items in square brackets are optional 

line number DATA constant [, constant. . .] Unit 12 

line number DEF Fbia(variable) = expression Unit 9 

line number DIM subscripted variable [, subscripted variable . . .] Unit 10 
line number END Unit 1 

line number FOR variable = expression TO expression 

[STEP expression] Unit 7 

line number GOSUB line number Unit 13 

line number GO TO line number Unit 4 

line numberlF relational expression THEN line number Unit 5 

line number INPUT variable [, variable . . .] Unit 3 

line number LET variable = expression Unit 3 

linenumberNEXT variable Unit 7 

line number ON expression GO TO line number 

[, line number .. .} Unit 5 

line number OPTION BASE base Unit 10 

line number PRINT [quantity delimiter quantity . . .] Unit 1 , 3,8 

line number RAN DOM IZ E Unit 6 

line number READ variable [, variable . . . ] Unit 12 

line number REM any remark or comment Unit 3 

line number RESTORE Unit 12 

line number RETURN Unit 13 

line number STOP Unit 13 

Standard Library functions in BASIC 

Function Meaning 

SQR(expression) Square root of expression 

ABS(expression) Absolute value of expression 

SGN (expression) Sign of expression: I if > 0, 0 if 0, — 1 if < 0 
INT(e.xpr£\«7o/)) Largest integer not greater than expression 
EXP (expression) The value of e > -' p '"""" 

LOG(expression) Natural logarithm (base e) of expression 
SW(expression) Sine of expression, expression in radians 
COS(expression) Cosine of expression, expression in radians 
JAN{expression) Tangent of expression, expression in radians 

ATN [expression) The angle in the range — 7r/2 to 7r/2 
radians whose tangent is expression 

The function RND, which is a random number generator, also appears in most versions 
of BASIC, together with the RANDOMIZE function. 
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